complete != combined

This commit is contained in:
Tanushree Tunstall 2022-09-12 14:50:23 +01:00
parent 77e4e9b61b
commit c896a04433

View file

@ -141,8 +141,8 @@ makeplot = function(x, # the DataFrame to plot
combined_training_genes = '999' # used only for the info box combined_training_genes = '999' # used only for the info box
){ ){
plot_data = x[x$resampling==resampler,] plot_data = x[x$resampling==resampler,]
# y_coord_min = min(plot_data[selection], na.rm=TRUE) y_coord_min = min(plot_data[selection], na.rm=TRUE)
y_coord_min = min(plot_data[selection]) #y_coord_min = min(plot_data[selection])
if (y_coord_min > 0) { if (y_coord_min > 0) {
y_coord_min = 0 y_coord_min = 0
@ -155,7 +155,7 @@ makeplot = function(x, # the DataFrame to plot
"\nTrain/Test Target Ratio: ", metadata$n_trainingY_ratio, "/", metadata$n_testY_ratio, "\nTrain/Test Target Ratio: ", metadata$n_trainingY_ratio, "/", metadata$n_testY_ratio,
"\nResampling: ", metadata$resampling, "\nResampling: ", metadata$resampling,
"\nFeatures: ", metadata$n_features, "\nFeatures: ", metadata$n_features,
"\nGenes Trained: ", combined_training_genes, "\nGenes Trained: ", combined_training_genes
#"\nTest Gene: ", gene #"\nTest Gene: ", gene
) )
} else { } else {