tanu/Dashboards
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

complete != combined

Browse source
This commit is contained in:
Tanushree Tunstall 2022-09-12 14:46:09 +01:00
parent 5471b4c8fa
commit 90a4c464e4
2 changed files with 5 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

8
ml/global.R
View file

@ -141,9 +141,9 @@ 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]) y_coord_min = min(plot_data[selection], na.rm=TRUE)
if (y_coord_min > 0) { if (y_coord_min >= 0) {
y_coord_min = 0 y_coord_min = 0
} }
if (display_infobox) { if (display_infobox) {
@ -155,7 +155,7 @@ makeplot = function(x, # the DataFrame to plot
"\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 {
metatext=paste0("Train/Test: ", metatext=paste0("Train/Test: ",
@ -350,7 +350,7 @@ if (interactive()){
selection, selection,
"none", # always 'none' for Feature Selection "none", # always 'none' for Feature Selection
gene = combo[drug==selected_drug,"gene"], gene = combo[drug==selected_drug,"gene"],
combined_training_genes = "NO DATA", combined_training_genes = combined_training_genes,
display_combined = TRUE display_combined = TRUE
),height=450 ),height=450
) )

2
ml/server.R
View file

@ -76,7 +76,7 @@ shinyServer(function(input, output, session) {
selection, selection,
"none", # always 'none' for Feature Selection "none", # always 'none' for Feature Selection
gene = combo[drug==selected_drug,"gene"], gene = combo[drug==selected_drug,"gene"],
combined_training_genes = "NO DATA", combined_training_genes = combined_training_genes,
display_combined = TRUE display_combined = TRUE
),height=450 ),height=450
) )