|
...
|
...
|
@@ -522,7 +522,7 @@ Chromstar <- function(inputfolder, experiment.table, outputfolder, configfile=NU
|
|
522
|
522
|
#--------------------
|
|
523
|
523
|
if (mode == 'full') {
|
|
524
|
524
|
multifile <- file.path(multipath, paste0('multivariate_mode-', mode, '_binsize', binsize.string, '_stepsize', stepsize.string, '.RData'))
|
|
525
|
|
- savename <- file.path(plotpath, paste0('multivariate_mode-', '_binsize', binsize.string, '_stepsize', stepsize.string, mode))
|
|
|
525
|
+ savename <- file.path(plotpath, paste0('multivariate_mode-', mode, '_binsize', binsize.string, '_stepsize', stepsize.string))
|
|
526
|
526
|
if (!file.exists(multifile)) {
|
|
527
|
527
|
files <- file.path(unipath, unifilenames)
|
|
528
|
528
|
states <- stateBrewer(exp.table, mode=mode, exclusive.table=conf[['exclusive.table']])
|
