loncom/interface/statistics/lonsubmissiontimeanalysis.pm - diff

Return to lonsubmissiontimeanalysis.pm CVS log

Up to [LON-CAPA] / loncom / interface / statistics

version 1.7, 2004/01/08 15:51:16	version 1.8, 2004/01/08 19:18:50
Line 253 sub analyze_times {	Line 253 sub analyze_times {
(undef,undef,undef,$mday,$month,$year,$wday) = localtime($endtime);	(undef,undef,undef,$mday,$month,$year,$wday) = localtime($endtime);
$xlabel .= $FullWeekDay[$wday].' '.	$xlabel .= $FullWeekDay[$wday].' '.
join(' ',($Month[$month],$mday,1900+$year));	join(' ',($Month[$month],$mday,1900+$year));
	my $width = 50+2*$bincount;
	if ($width < 250) {
	$width = 250;
	}
$html .= &Apache::loncommon::DrawXYYGraph($title,	$html .= &Apache::loncommon::DrawXYYGraph($title,
$xlabel,	$xlabel,
'Submissions vs Time',	'Submissions vs Time',
Line 265 sub analyze_times {	Line 269 sub analyze_times {
(xskip => $bins_per_day,	(xskip => $bins_per_day,
x_ticks => $bins_per_day,	x_ticks => $bins_per_day,
x_tick_offset => $bins_per_day,	x_tick_offset => $bins_per_day,
width => 50+2*$bincount,	width => $width,
y1_label=>'Number of Submissions per hour',	y1_label=>'Number of Submissions per hour',
y2_label=>'Percent of Students answering Correctly',	y2_label=>'Percent of Students answering Correctly',
'data.1.label'=>'Submissions per hour',	'data.1.label'=>'Submissions per hour',