library(pROC)
library(plotly)
library(MiMIR)
#load the dataset
met <- synthetic_metabolic_dataset
phen<- synthetic_phenotypic_dataset
#Calculating the binarized surrogates
b_phen<-binarize_all_pheno(phen)
#Apply a surrogate models and plot the ROC curve
surr<-calculate_surrogate_scores(met, phen, MiMIR::PARAM_surrogates, colnames(b_phen))
roc_surro_subplots(surr$surrogates, b_phen)
Run the code above in your browser using DataLab