add control of t-tests to algorihtm-comparison reports

1 files changed, 7 insertions, 3 deletions

diff --git a/report/report_application.rb b/report/report_application.rb
index 8f74bd9..b96fb27 100755
--- a/report/report_application.rb
+++ b/report/report_application.rb
@@ -68,8 +68,12 @@ get '/report/:report_type' do
       # if searching for a report, ?validation="uri" or ?crossvalidaiton="uri" is given as search param
       # use this (search param has equal name as report type) as default value for validation_uri 
       post_command.attributes << OpenTox::PostAttribute.new("validation_uris",true,params[params[:report_type]],val_uri_description)
-      post_command.attributes << OpenTox::PostAttribute.new("identifier",true,nil,"Specifiy one identifier for each uri, separated with ','") if
-        params[:report_type]=="algorithm_comparison"
+      if params[:report_type]=="algorithm_comparison"
+        post_command.attributes << OpenTox::PostAttribute.new("identifier",true,nil,"Specifiy one identifier for each uri, separated with ','")
+        post_command.attributes << OpenTox::PostAttribute.new("ttest_significance",false,"0.9","Significance level for t-tests (Set to '0' to disable t-test).")
+        post_command.attributes << OpenTox::PostAttribute.new("ttest_attributes",false,nil,"Attributes for t-test; default for classification: '"+
+          VAL_ATTR_TTEST_CLASS.join(",")+"', default for regression: '"+VAL_ATTR_TTEST_REGR.join(",")+"'")
+      end
       content_type "text/html"
       OpenTox.text_to_html rs.get_all_reports(params[:report_type], params),@subjectid,related_links,description,post_command
     else
@@ -129,7 +133,7 @@ post '/report/:type' do
   task = OpenTox::Task.create("Create report",url_for("/report/"+params[:type], :full)) do |task| #,params
     perform do |rs|
       rs.create_report(params[:type],params[:validation_uris]?params[:validation_uris].split(/\n|,/):nil,
-        params[:identifier]?params[:identifier].split(/\n|,/):nil,@subjectid,task)
+        params[:identifier]?params[:identifier].split(/\n|,/):nil,params,@subjectid,task)
     end
   end
   return_task(task)