tk/Inhouse_lmm: fixed result table output

lib/toolbox/inhouse_lmm.ml

@@ -125,4 +125,4 @@ let test ~alignment ~tree =
       test_on_one_site ~alignment ~phenotypes ~transform_matrix ~site)
 
 let result_table_of_test pvals =
-  Result_table.{ oracle = None; scores_per_meth = [ ("HomeLMM", pvals) ] }
+  Result_table.{ oracle = None; scores_per_meth = [ ("HomeLMM", Array.map pvals ~f:(Option.map ~f:(( -. ) 1.))) ] }