mirror of
https://github.com/moodle/moodle.git
synced 2025-03-06 08:49:53 +01:00
f29e6691a7
MDL-15960 "Overview report does not work correctly with groups" Fixed a problem that group mode was not working as the logic selecting the attempts mode was erroneously showing the all attempts mode. MDL-15958 "Error on selecting to hide marks for each question" problem with trying to sort on question grades when grades not displayed fixed. MDL-15953 "Summary chart to show in 5% ranges please" allowed the graph to show up to or equal to 20 bands, instead of just up to 20. MDL-14201 "Summary graph" showing two graphs now as it was felt that when there were few students in a group compared with all the students who took a quiz then it would be difficult to see the data for the group.
100 lines
3.3 KiB
PHP
100 lines
3.3 KiB
PHP
<?php // $Id$
|
|
include '../../../../config.php';
|
|
include $CFG->dirroot."/lib/graphlib.php";
|
|
include $CFG->dirroot."/mod/quiz/report/reportlib.php";
|
|
$quizid = required_param('id', PARAM_INT);
|
|
$groupid = optional_param('groupid', 0, PARAM_INT);
|
|
|
|
$quiz = $DB->get_record('quiz', array('id' => $quizid));
|
|
$course = $DB->get_record('course', array('id' => $quiz->course));
|
|
require_login($course);
|
|
$cm = get_coursemodule_from_instance('quiz', $quizid);
|
|
$modcontext = get_context_instance(CONTEXT_MODULE, $cm->id);
|
|
if ($groupid && $groupmode = groups_get_activity_groupmode($cm)) { // Groups are being used
|
|
$groups = groups_get_activity_allowed_groups($cm);
|
|
if (array_key_exists($groupid, $groups)){
|
|
$group = $groups[$groupid];
|
|
if (!$groupusers = get_users_by_capability($modcontext, 'mod/quiz:attempt','','','','',$group->id,'',false)){
|
|
print_error('nostudentsingroup');
|
|
} else {
|
|
$groupusers = array_keys($groupusers);
|
|
}
|
|
} else {
|
|
print_error('errorinvalidgroup', 'group', null, $groupid);
|
|
}
|
|
} else {
|
|
$groups = false;
|
|
$group = false;
|
|
$groupusers = array();
|
|
}
|
|
require_capability('mod/quiz:viewreports', $modcontext);
|
|
|
|
$line = new graph(800,600);
|
|
$line->parameter['title'] = '';
|
|
$line->parameter['y_label_left'] = $course->students;
|
|
$line->parameter['x_label'] = get_string('grade');
|
|
$line->parameter['y_label_angle'] = 90;
|
|
$line->parameter['x_label_angle'] = 0;
|
|
$line->parameter['x_axis_angle'] = 60;
|
|
|
|
//following two lines seem to silence notice warnings from graphlib.php
|
|
$line->y_tick_labels = null;
|
|
$line->offset_relation = null;
|
|
|
|
$line->parameter['bar_size'] = 1; // will make size > 1 to get overlap effect when showing groups
|
|
$line->parameter['bar_spacing'] = 10; // don't forget to increase spacing so that graph doesn't become one big block of colour
|
|
|
|
//pick a sensible number of bands depending on quiz maximum grade.
|
|
$bands = $quiz->grade;
|
|
while ($bands > 20 || $bands <= 10){
|
|
if ($bands > 50){
|
|
$bands = $bands /5;
|
|
} else if ($bands > 20) {
|
|
$bands = $bands /2;
|
|
}
|
|
if ($bands < 4){
|
|
$bands = $bands * 5;
|
|
} else if ($bands <= 10){
|
|
$bands = $bands * 2;
|
|
}
|
|
}
|
|
|
|
$bandwidth = $quiz->grade / $bands;
|
|
$bands = ceil($bands);
|
|
$bandlabels = array();
|
|
for ($i=0;$i < $quiz->grade;$i += $bandwidth){
|
|
$label = quiz_format_grade($quiz, $i).' - ';
|
|
if ($quiz->grade > $i+$bandwidth){
|
|
$label .= quiz_format_grade($quiz, $i+$bandwidth);
|
|
} else {
|
|
$label .= quiz_format_grade($quiz, $quiz->grade);
|
|
}
|
|
$bandlabels[] = $label;
|
|
}
|
|
$line->x_data = $bandlabels;
|
|
|
|
$line->y_format['allusers'] =
|
|
array('colour' => 'red', 'bar' => 'fill', 'shadow_offset' => 1, 'legend' => get_string('allparticipants'));
|
|
$line->y_data['allusers'] = quiz_report_grade_bands($bandwidth, $bands, $quizid, $groupusers);
|
|
|
|
$line->y_order = array('allusers');
|
|
|
|
$line->parameter['y_min_left'] = 0; // start at 0
|
|
$line->parameter['y_max_left'] = max($line->y_data['allusers']);
|
|
$line->parameter['y_decimal_left'] = 0; // 2 decimal places for y axis.
|
|
|
|
|
|
//pick a sensible number of gridlines depending on max value on graph.
|
|
$gridlines = max($line->y_data['allusers']);
|
|
while ($gridlines >= 10){
|
|
if ($gridlines >= 50){
|
|
$gridlines = $gridlines /5;
|
|
} else {
|
|
$gridlines = $gridlines /2;
|
|
}
|
|
}
|
|
|
|
$line->parameter['y_axis_gridlines'] = $gridlines+1;
|
|
$line->draw();
|
|
?>
|