Remove train and test data from predictive performance results

code/calculate-predictive-perf.R

@@ -106,7 +106,8 @@ multiclass_prediction <- function(result, method_id, data_id, n_genes, fold_k =
       mean_precision = mean(precision),
       mean_f1_score = mean(f1_score)
     ) %>%
-    ungroup()
+    ungroup() %>%
+    select(-c(train_data, test_data, train_ind))
 
   out
 }