--- loncom/interface/statistics/lonproblemanalysis.pm 2004/10/04 19:10:26 1.91 +++ loncom/interface/statistics/lonproblemanalysis.pm 2004/10/05 14:03:45 1.93 @@ -1,6 +1,6 @@ # The LearningOnline Network with CAPA # -# $Id: lonproblemanalysis.pm,v 1.91 2004/10/04 19:10:26 matthew Exp $ +# $Id: lonproblemanalysis.pm,v 1.93 2004/10/05 14:03:45 matthew Exp $ # # Copyright Michigan State University Board of Trustees # @@ -619,9 +619,9 @@ sub OR_tries_analysis { foreach my $foilid (@{$concept->{'foils'}}) { for (my $try=$mintries;$try<=$maxtries;$try++) { # concept analysis data - $concept_data[$j]->{'_correct'} += + $concept_data[$j]->[$try]->{'_correct'} += $response_data{$foilid}->[$try]->{'_correct'}; - $concept_data[$j]->{'_total'} += + $concept_data[$j]->[$try]->{'_total'} += $response_data{$foilid}->[$try]->{'_total'}; # # foil analysis data @@ -663,19 +663,32 @@ sub OR_tries_analysis { if (defined($Concepts)) { $num_concepts = scalar(@$Concepts); } # for (my $try=$mintries;$try<=$maxtries;$try++) { + if (! defined($response_data{'_total'}->[$try]) || + $response_data{'_total'}->[$try] == 0) { + if ($try > 1) { + $analysis_html.= '