marcelcosta/CytoR
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Cambio en la definición del máximo.

Browse Source
This commit is contained in:
Marcel Costa
2024-04-17 07:55:48 +00:00
parent f3c2b0ca21
commit b6ce06d092
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files
functionsCyto.R
+1 -1
View File
@@ -71,7 +71,7 @@ transform_gs<-function(gs, saveparams=NULL, trans_params_obj=NULL, index=1){
if (is.null(trans_params_obj)){
log_mark<-colnames(gs)[!grepl("FS|SS|Time", colnames(gs))]
trans_params<-lapply(log_mark, function(x) list(channel=x, scale="biexp",maxvalue=250000,pos=4, widthBasis=-400, max=5, min=0))
trans_params<-lapply(log_mark, function(x) list(channel=x, scale="biexp",maxvalue=250000,pos=4, widthBasis=-400, max=10^3.7, min=0))
names(trans_params)<-log_mark
log_mark_lin<-colnames(gs)[grepl("FS|SS|Time", colnames(gs))]
trans_params_lin<-lapply(log_mark_lin, function(x) list(channel=x, scale="lin",