diff options
| author | Alexander Kabui | 2024-12-20 18:28:26 +0300 |
|---|---|---|
| committer | GitHub | 2024-12-20 18:28:26 +0300 |
| commit | 745ae64283f97101465457a0dd571d9097556dfe (patch) | |
| tree | 4076faa4e36716b3491bddc8d3eefdf0a154e6f7 /scripts/rqtl_wrapper.R | |
| parent | 0c9885d22ff89b5529757b30f83143396ca43e5e (diff) | |
| parent | 6ea74320bc92939d1c99e406623568a183cc75b9 (diff) | |
| download | genenetwork3-745ae64283f97101465457a0dd571d9097556dfe.tar.gz | |
Merge pull request #205 from genenetwork/feature/integrate-streaming-api-functionality
feat: Init integrate streaming functionality to rqtl1.
Diffstat (limited to 'scripts/rqtl_wrapper.R')
| -rw-r--r-- | scripts/rqtl_wrapper.R | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/scripts/rqtl_wrapper.R b/scripts/rqtl_wrapper.R index 31c1277..dd19281 100644 --- a/scripts/rqtl_wrapper.R +++ b/scripts/rqtl_wrapper.R @@ -24,7 +24,7 @@ option_list = list( make_option(c("--control"), type="character", default=NULL, help="Name of marker (contained in genotype file) to be used as a control"), make_option(c("-o", "--outdir"), type="character", default=file.path(tmp_dir, "gn3"), help="Directory in which to write result file"), make_option(c("-f", "--filename"), type="character", default=NULL, help="Name to use for result file"), - make_option(c("-v", "--verbose"), action="store_true", default=NULL, help="Show extra information") + make_option(c("-v", "--verbose"), action="store_true", default=TRUE, help="Show extra information") ); opt_parser = OptionParser(option_list=option_list); @@ -353,5 +353,8 @@ if (!is.null(opt$pairscan)) { colnames(qtl_results)[4:7] <- c("AC", "AD", "BC", "BD") } + write.csv(qtl_results, out_file) } + + |