diff ideas_preprocessor.R @ 7:92bb33490bb4 draft

Uploaded
author greg
date Wed, 24 Jan 2018 09:55:28 -0500
parents 2b4e1bd725f7
children 0cf23f33d13d
line wrap: on
line diff
--- a/ideas_preprocessor.R	Wed Jan 24 09:55:21 2018 -0500
+++ b/ideas_preprocessor.R	Wed Jan 24 09:55:28 2018 -0500
@@ -1,4 +1,3 @@
-(.venv) [galaxy@IDEAS ideas_preprocessor]$ cat ideas_preprocessor.R
 #!/usr/bin/env Rscript
 
 suppressPackageStartupMessages(library("data.table"))
@@ -88,7 +87,7 @@
     to_path = paste(output_tmp_dir, tmp_files[i], sep="/");
     file.rename(from_path, to_path);
 }
-if (!is.nulll(opt$chrom_bed_input) && !is.null(opt$chromosome_windows)) {
+if (!is.null(opt$chrom_bed_input) && !is.null(opt$chromosome_windows)) {
     # Rename chrom_bed_input to chromosomes.txt
     # and move it to the output directory.
     to_path = paste(opt$output_files_path, "chromosomes.bed", sep="/");
@@ -98,4 +97,4 @@
     file.rename(opt$chromosome_windows, to_path);
 }
 # Create the primary HTML dataset.
-create_primary_html(opt$output, opt$output_hid, opt$output_files_path);
+create_primary_html(opt$output, opt$output_hid, opt$output_files_path);
\ No newline at end of file