diff options
author | Eugeniy E. Mikhailov <evgmik@gmail.com> | 2018-05-10 20:58:49 -0400 |
---|---|---|
committer | Eugeniy E. Mikhailov <evgmik@gmail.com> | 2018-05-10 20:58:49 -0400 |
commit | d2407136249bd574189f9d9e3eb0e2fe07dc1d5c (patch) | |
tree | 7f0ad4334ae26696eb6a571b943e7610fa66c1bb | |
parent | 936a316fd1dc5ff1f7b0d72d028de10e431382eb (diff) | |
download | GradeBook-d2407136249bd574189f9d9e3eb0e2fe07dc1d5c.tar.gz GradeBook-d2407136249bd574189f9d9e3eb0e2fe07dc1d5c.zip |
added histogram output to the table stats
-rwxr-xr-x | GradeBook_lib.tcl | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/GradeBook_lib.tcl b/GradeBook_lib.tcl index f459d9a..7ca586f 100755 --- a/GradeBook_lib.tcl +++ b/GradeBook_lib.tcl @@ -1271,6 +1271,7 @@ proc htmlFormatTheStatsForGradeRaw { stats_needed sql_column_str hidden_columns "mean" {set sql_user_name _The_Mean_Grade_} "median" {set sql_user_name _The_Median_Grade_} "stdev" {set sql_user_name _The_StDev_Grade_} + "histogram_plot" {set sql_user_name _The_Grades_Hist_Text_Plot_} default { htmlErrorMsg "Required stats ($stats_needed) to output is not known" return "" @@ -1296,6 +1297,7 @@ proc htmlFormatTheStatsForGradeRaw { stats_needed sql_column_str hidden_columns "mean" {set col_value "Mean"} "median" {set col_value "Median"} "stdev" {set col_value "StDev"} + "histogram_plot" {set col_value "Histogram"} default {set col_value "UNKNOWN"} } } @@ -1528,6 +1530,7 @@ proc htmlDBout {db permission_list user {sort_col {}}} { puts [htmlFormatTheStatsForGradeRaw stdev $sql_column_str $hidden_columns] puts [htmlFormatTheStatsForGradeRaw median $sql_column_str $hidden_columns] puts [htmlFormatTheStatsForGradeRaw low $sql_column_str $hidden_columns] + puts [htmlFormatTheStatsForGradeRaw histogram_plot $sql_column_str $hidden_columns] } puts "<tr>" |