diff options
| author | Frederick Muriuki Muriithi | 2024-09-27 15:41:20 -0500 |
|---|---|---|
| committer | Frederick Muriuki Muriithi | 2024-09-27 15:41:20 -0500 |
| commit | e2883e55b47f062b2d3d6ae50d6fe533ba8d841d (patch) | |
| tree | 292dee904e0efbdd5c69019f913f160c2c67c4d0 | |
| parent | 453087e52906919e78d7d6cb111feb82d517ff0b (diff) | |
| download | genenetwork3-e2883e55b47f062b2d3d6ae50d6fe533ba8d841d.tar.gz | |
Fix Pair-Scan output paths
Related to 4940195460008192b6ca6269e1fb8c172ada4f17c
| -rw-r--r-- | scripts/rqtl_wrapper.R | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/scripts/rqtl_wrapper.R b/scripts/rqtl_wrapper.R index fd786cf..31c1277 100644 --- a/scripts/rqtl_wrapper.R +++ b/scripts/rqtl_wrapper.R @@ -262,9 +262,9 @@ if (!is.null(opt$pairscan)) { # Calculate permutations if (opt$nperm > 0) { if (!is.null(opt$filename)){ - perm_out_file = file.path(opt$outdir, "output", paste("PERM_", opt$filename, sep = "" )) + perm_out_file = file.path(opt$outdir, "gn3", paste("PERM_", opt$filename, sep = "" )) } else { - perm_out_file = file.path(opt$outdir, "output", paste(pheno_name, "_PERM_", stri_rand_strings(1, 8), sep = "")) + perm_out_file = file.path(opt$outdir, "gn3", paste(pheno_name, "_PERM_", stri_rand_strings(1, 8), sep = "")) } if (!is.null(opt$addcovar) || !is.null(opt$control)){ @@ -303,7 +303,7 @@ if (!is.null(opt$addcovar) || !is.null(opt$control)){ verbose_print('Writing results to CSV file\n') if (!is.null(opt$pairscan)) { - map_out_file = file.path(opt$outdir, "output", paste("MAP_", opt$filename, sep = "" )) + map_out_file = file.path(opt$outdir, "gn3", paste("MAP_", opt$filename, sep = "" )) write.csv(qtl_results[1], out_file) write.csv(qtl_results[2], map_out_file) } else { |