loncom/interface/statistics/lonstudentassessment.pm - diff

Return to lonstudentassessment.pm CVS log

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

version 1.169.2.6, 2014/04/05 13:03:06	version 1.169.2.8, 2024/07/02 14:19:01
Line 741 NEW_WINDOW_CHECKBOX	Line 741 NEW_WINDOW_CHECKBOX
length($title)	length($title)
)).$padding;	)).$padding;
}	}
$total_sum_width = length($total_count)+1;	$total_sum_width = length($total_count);
	if ($total_sum_width < 6) {
	$total_sum_width = 6;
	}
$Str .= " total</pre>\n";	$Str .= " total</pre>\n";
$Str .= "<pre>";	$Str .= "<pre>";

Line 935 sub html_outputstudent {	Line 938 sub html_outputstudent {
$score = sprintf("%.2f",$score);	$score = sprintf("%.2f",$score);
$score = (' 'x(6-length($score))).$score;	$score = (' 'x(6-length($score))).$score;
}	}
	$max = sprintf("%.2f",$max);
$Str .= ' '.' 'x($total_sum_width-length($score)).$score.' / '.$max;	$Str .= ' '.' 'x($total_sum_width-length($score)).$score.' / '.$max;
$Str .= " \n";	$Str .= " \n";
#	#
Line 2141 sub student_performance_on_sequence {	Line 2145 sub student_performance_on_sequence {
}	}
if ($randompick) {	if ($randompick) {
my @uniquetotals = keys(%ptsfreq);	my @uniquetotals = keys(%ptsfreq);
if ((@uniquetotals = 1) && ($ptsfreq{$uniquetotals[0]} > 0)) {	if ((@uniquetotals == 1) && ($ptsfreq{$uniquetotals[0]} > 0)) {
$max = $max * $randompick/$ptsfreq{$uniquetotals[0]};	$max = $max * $randompick/$ptsfreq{$uniquetotals[0]};
}	}
}	}