45bbcc6e0c5ec51f3e6ff3199e551de8ad6f04e9
[moodle.git] / mod / quiz / report / statistics / statistics_table.php
1 <?php
2 // This file is part of Moodle - http://moodle.org/
3 //
4 // Moodle is free software: you can redistribute it and/or modify
5 // it under the terms of the GNU General Public License as published by
6 // the Free Software Foundation, either version 3 of the License, or
7 // (at your option) any later version.
8 //
9 // Moodle is distributed in the hope that it will be useful,
10 // but WITHOUT ANY WARRANTY; without even the implied warranty of
11 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12 // GNU General Public License for more details.
13 //
14 // You should have received a copy of the GNU General Public License
15 // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
17 /**
18  * Quiz statistics report, table for showing statistics of each question in the quiz.
19  *
20  * @package   quiz_statistics
21  * @copyright 2008 Jamie Pratt
22  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
23  */
25 defined('MOODLE_INTERNAL') || die();
27 require_once($CFG->libdir.'/tablelib.php');
29 /**
30  * This table has one row for each question in the quiz, with sub-rows when
31  * random questions and variants appear.
32  *
33  * There are columns for the various item and position statistics.
34  *
35  * @copyright 2008 Jamie Pratt
36  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
37  */
38 class quiz_statistics_table extends flexible_table {
39     /** @var object the quiz settings. */
40     protected $quiz;
42     /** @var integer the quiz course_module id. */
43     protected $cmid;
45     /**
46      * Constructor.
47      */
48     public function __construct() {
49         parent::__construct('mod-quiz-report-statistics-report');
50     }
52     /**
53      * Set up the columns and headers and other properties of the table and then
54      * call flexible_table::setup() method.
55      *
56      * @param object $quiz the quiz settings
57      * @param int $cmid the quiz course_module id
58      * @param moodle_url $reporturl the URL to redisplay this report.
59      * @param int $s number of attempts included in the statistics.
60      */
61     public function statistics_setup($quiz, $cmid, $reporturl, $s) {
62         $this->quiz = $quiz;
63         $this->cmid = $cmid;
65         // Define the table columns.
66         $columns = array();
67         $headers = array();
69         $columns[] = 'number';
70         $headers[] = get_string('questionnumber', 'quiz_statistics');
72         if (!$this->is_downloading()) {
73             $columns[] = 'icon';
74             $headers[] = '';
75             $columns[] = 'actions';
76             $headers[] = '';
77         } else {
78             $columns[] = 'qtype';
79             $headers[] = get_string('questiontype', 'quiz_statistics');
80         }
82         $columns[] = 'name';
83         $headers[] = get_string('questionname', 'quiz');
85         $columns[] = 's';
86         $headers[] = get_string('attempts', 'quiz_statistics');
88         if ($s > 1) {
89             $columns[] = 'facility';
90             $headers[] = get_string('facility', 'quiz_statistics');
92             $columns[] = 'sd';
93             $headers[] = get_string('standarddeviationq', 'quiz_statistics');
94         }
96         $columns[] = 'random_guess_score';
97         $headers[] = get_string('random_guess_score', 'quiz_statistics');
99         $columns[] = 'intended_weight';
100         $headers[] = get_string('intended_weight', 'quiz_statistics');
102         $columns[] = 'effective_weight';
103         $headers[] = get_string('effective_weight', 'quiz_statistics');
105         $columns[] = 'discrimination_index';
106         $headers[] = get_string('discrimination_index', 'quiz_statistics');
108         $columns[] = 'discriminative_efficiency';
109         $headers[] = get_string('discriminative_efficiency', 'quiz_statistics');
111         $this->define_columns($columns);
112         $this->define_headers($headers);
113         $this->sortable(false);
115         $this->column_class('s', 'numcol');
116         $this->column_class('facility', 'numcol');
117         $this->column_class('sd', 'numcol');
118         $this->column_class('random_guess_score', 'numcol');
119         $this->column_class('intended_weight', 'numcol');
120         $this->column_class('effective_weight', 'numcol');
121         $this->column_class('discrimination_index', 'numcol');
122         $this->column_class('discriminative_efficiency', 'numcol');
124         // Set up the table.
125         $this->define_baseurl($reporturl->out());
127         $this->collapsible(true);
129         $this->set_attribute('id', 'questionstatistics');
130         $this->set_attribute('class', 'generaltable generalbox boxaligncenter');
132         parent::setup();
133     }
135     /**
136      * The question number.
137      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
138      * @return string contents of this table cell.
139      */
140     protected function col_number($questionstat) {
141         if (!isset($questionstat->question->number)) {
142             return '';
143         }
144         $number = $questionstat->question->number;
146         if (isset($questionstat->subqdisplayorder)) {
147             $number = $number . '.'.$questionstat->subqdisplayorder;
148         }
150         if ($questionstat->question->qtype != 'random' && !is_null($questionstat->variant)) {
151             $number = $number . '.'.$questionstat->variant;
152         }
154         return $number;
155     }
157     /**
158      * The question type icon.
159      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
160      * @return string contents of this table cell.
161      */
162     protected function col_icon($questionstat) {
163         return print_question_icon($questionstat->question, true);
164     }
166     /**
167      * Actions that can be performed on the question by this user (e.g. edit or preview).
168      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
169      * @return string contents of this table cell.
170      */
171     protected function col_actions($questionstat) {
172         return quiz_question_action_icons($this->quiz, $this->cmid, $questionstat->question, $this->baseurl);
173     }
175     /**
176      * The question type name.
177      *
178      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
179      * @return string contents of this table cell.
180      */
181     protected function col_qtype($questionstat) {
182         return question_bank::get_qtype_name($questionstat->question->qtype);
183     }
185     /**
186      * The question name.
187      *
188      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
189      * @return string contents of this table cell.
190      */
191     protected function col_name($questionstat) {
192         $name = $questionstat->question->name;
194         if (!is_null($questionstat->variant)) {
195             $a = new stdClass();
196             $a->name = $name;
197             $a->variant = $questionstat->variant;
198             $name = get_string('nameforvariant', 'quiz_statistics', $a);
199         }
201         if ($this->is_downloading()) {
202             return $name;
203         }
205         $url = null;
206         if ($questionstat->subquestion) {
207             $url = new moodle_url($this->baseurl, array('qid' => $questionstat->questionid));
208         } else if ($questionstat->slot && $questionstat->question->qtype != 'random') {
209             $url = new moodle_url($this->baseurl, array('slot' => $questionstat->slot));
210         }
212         if ($url) {
213             $name = html_writer::link($url, $name,
214                     array('title' => get_string('detailedanalysis', 'quiz_statistics')));
215         }
217         if ($this->is_dubious_question($questionstat)) {
218             $name = html_writer::tag('div', $name, array('class' => 'dubious'));
219         }
221         if (!empty($questionstat->minmedianmaxnotice)) {
222             $name = get_string($questionstat->minmedianmaxnotice, 'quiz_statistics') . '<br />' . $name;
223         }
225         return $name;
226     }
228     /**
229      * The number of attempts at this question.
230      *
231      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
232      * @return string contents of this table cell.
233      */
234     protected function col_s($questionstat) {
235         if (!isset($questionstat->s)) {
236             return 0;
237         }
239         return $questionstat->s;
240     }
242     /**
243      * The facility index (average fraction).
244      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
245      * @return string contents of this table cell.
246      */
247     protected function col_facility($questionstat) {
248         if (is_null($questionstat->facility)) {
249             return '';
250         }
252         return number_format($questionstat->facility*100, 2) . '%';
253     }
255     /**
256      * The standard deviation of the fractions.
257      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
258      * @return string contents of this table cell.
259      */
260     protected function col_sd($questionstat) {
261         if (is_null($questionstat->sd) || $questionstat->maxmark == 0) {
262             return '';
263         }
265         return number_format($questionstat->sd*100 / $questionstat->maxmark, 2) . '%';
266     }
268     /**
269      * An estimate of the fraction a student would get by guessing randomly.
270      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
271      * @return string contents of this table cell.
272      */
273     protected function col_random_guess_score($questionstat) {
274         if (is_null($questionstat->randomguessscore)) {
275             return '';
276         }
278         return number_format($questionstat->randomguessscore * 100, 2).'%';
279     }
281     /**
282      * The intended question weight. Maximum mark for the question as a percentage
283      * of maximum mark for the quiz. That is, the indended influence this question
284      * on the student's overall mark.
285      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
286      * @return string contents of this table cell.
287      */
288     protected function col_intended_weight($questionstat) {
289         return quiz_report_scale_summarks_as_percentage($questionstat->maxmark, $this->quiz);
290     }
292     /**
293      * The effective question weight. That is, an estimate of the actual
294      * influence this question has on the student's overall mark.
295      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
296      * @return string contents of this table cell.
297      */
298     protected function col_effective_weight($questionstat) {
299         global $OUTPUT;
301         if ($questionstat->subquestion) {
302             return '';
303         }
305         if ($questionstat->negcovar) {
306             $negcovar = get_string('negcovar', 'quiz_statistics');
308             if (!$this->is_downloading()) {
309                 $negcovar = html_writer::tag('div',
310                         $negcovar . $OUTPUT->help_icon('negcovar', 'quiz_statistics'),
311                         array('class' => 'negcovar'));
312             }
314             return $negcovar;
315         }
317         return number_format($questionstat->effectiveweight, 2) . '%';
318     }
320     /**
321      * Discrimination index. This is the product moment correlation coefficient
322      * between the fraction for this question, and the average fraction for the
323      * other questions in this quiz.
324      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
325      * @return string contents of this table cell.
326      */
327     protected function col_discrimination_index($questionstat) {
328         if (!is_numeric($questionstat->discriminationindex)) {
329             return $questionstat->discriminationindex;
330         }
332         return number_format($questionstat->discriminationindex, 2) . '%';
333     }
335     /**
336      * Discrimination efficiency, similar to, but different from, the Discrimination index.
337      *
338      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
339      * @return string contents of this table cell.
340      */
341     protected function col_discriminative_efficiency($questionstat) {
342         if (!is_numeric($questionstat->discriminativeefficiency)) {
343             return '';
344         }
346         return number_format($questionstat->discriminativeefficiency, 2) . '%';
347     }
349     /**
350      * This method encapsulates the test for wheter a question should be considered dubious.
351      * @param \core_question\statistics\questions\calculated $questionstat stats for the question.
352      * @return bool is this question possibly not pulling it's weight?
353      */
354     protected function is_dubious_question($questionstat) {
355         if (!is_numeric($questionstat->discriminativeefficiency)) {
356             return false;
357         }
359         return $questionstat->discriminativeefficiency < 15;
360     }
362     public function  wrap_html_start() {
363         // Horrible Moodle 2.0 wide-content work-around.
364         if (!$this->is_downloading()) {
365             echo html_writer::start_tag('div', array('id' => 'tablecontainer',
366                     'class' => 'statistics-tablecontainer'));
367         }
368     }
370     public function wrap_html_finish() {
371         if (!$this->is_downloading()) {
372             echo html_writer::end_tag('div');
373         }
374     }