version 1.122, 2005/11/07 22:09:00
|
version 1.125, 2006/05/01 19:29:13
|
Line 97 sub BuildProblemAnalysisPage {
|
Line 97 sub BuildProblemAnalysisPage {
|
$r->print($html.(' 'x5)); |
$r->print($html.(' 'x5)); |
} |
} |
# |
# |
$r->print(&Apache::lonstathelpers::submission_report_form |
|
('problem_analysis')); |
# This is commented out pending actual implementation of |
|
# CSV and Excel output. |
|
#$r->print(&Apache::lonstathelpers::submission_report_form |
|
# ('problem_analysis')); |
# |
# |
$r->print('<hr />'); |
$r->print('<hr />'); |
$r->rflush(); |
$r->rflush(); |
Line 398 sub numerical_plot_differences {
|
Line 401 sub numerical_plot_differences {
|
} elsif ($low_bin < 0 && $high_bin < -$low_bin) { |
} elsif ($low_bin < 0 && $high_bin < -$low_bin) { |
$high_bin = -$low_bin; |
$high_bin = -$low_bin; |
} |
} |
if (($high_bin -$low_bin)/$min_bin_size * 2 > $max_bins) { |
if (!$min_bin_size || |
|
($high_bin -$low_bin)/$min_bin_size * 2 > $max_bins) { |
$min_bin_size = abs($high_bin - $low_bin) / $max_bins * 2; |
$min_bin_size = abs($high_bin - $low_bin) / $max_bins * 2; |
} |
} |
my @bins; |
my @bins; |
Line 1819 sub CreateInterface {
|
Line 1823 sub CreateInterface {
|
## |
## |
## Build the menu |
## Build the menu |
my $Str = ''; |
my $Str = ''; |
$Str .= &Apache::lonhtmlcommon::breadcrumbs |
$Str .= &Apache::lonhtmlcommon::breadcrumbs('Detailed Problem Analysis'); |
(undef,'Detailed Problem Analysis'); |
|
$Str .= '<table cellspacing="5">'."\n"; |
$Str .= '<table cellspacing="5">'."\n"; |
$Str .= '<tr>'; |
$Str .= '<tr>'; |
$Str .= '<td align="center"><b>'.&mt('Sections').'</b></td>'; |
$Str .= '<td align="center"><b>'.&mt('Sections').'</b></td>'; |