This commit is contained in:
Marcel Costa
2024-04-17 07:57:04 +00:00
+2 -2
View File
@@ -79,8 +79,8 @@ transform_gs<-function(gs, saveparams=NULL, trans_params_obj=NULL, index=1){
names(trans_params_lin)<-log_mark_lin
trans_params<-c(trans_params_lin, trans_params)
}else{
log_mark<-colnames(gs)[!grepl("FSC|SSC|Time", colnames(gs))]
log_mark_lin<-colnames(gs)[grepl("FSC|SSC|Time", colnames(gs))]
log_mark<-colnames(gs)[!grepl("FS|SS|Time", colnames(gs))]
log_mark_lin<-colnames(gs)[grepl("FS|SS|Time", colnames(gs))]
}
shiny::runApp(shiny::shinyApp(