data(cobradata_example)
cobradata_example[c("ENSG00000000457", "ENSG00000000971",
"ENSG00000000460"), ]
cobraperf <- calculate_performance(cobradata_example,
binary_truth = "status",
aspects = "fdrtpr")
cobraperf[, c("voom")]
cobraplot <- prepare_data_for_plot(cobraperf)
cobraplot[, c("voom")]
Run the code above in your browser using DataLab