comparison ideas_preprocessor.R @ 15:ce2021cd68d2 draft

Uploaded
author greg
date Thu, 25 Jan 2018 11:14:36 -0500
parents 20c21d946a8e
children 504226a7eb75
comparison
equal deleted inserted replaced
14:20c21d946a8e 15:ce2021cd68d2
109 } 109 }
110 if (!is.null(opt$chrom_bed_input) && !is.null(opt$chromosome_windows)) { 110 if (!is.null(opt$chrom_bed_input) && !is.null(opt$chromosome_windows)) {
111 # Renane opt$chrom_bed_input to be chromosomes.bed 111 # Renane opt$chrom_bed_input to be chromosomes.bed
112 # and make a copy of it in the output directory. 112 # and make a copy of it in the output directory.
113 to_path = paste(opt$output_files_path, "chromosomes.bed", sep="/"); 113 to_path = paste(opt$output_files_path, "chromosomes.bed", sep="/");
114 file.copy(opt$chromosome_windows, to_path); 114 file.copy(opt$chrom_bed_input, to_path);
115 # Move chromosome_windows.txt to the output directory. 115 # Move chromosome_windows.txt to the output directory.
116 to_path = paste(opt$output_files_path, opt$chromosome_windows, sep="/"); 116 to_path = paste(opt$output_files_path, opt$chromosome_windows, sep="/");
117 file.rename(opt$chromosome_windows, to_path); 117 file.rename(opt$chromosome_windows, to_path);
118 } 118 }
119 # Create the primary HTML dataset. 119 # Create the primary HTML dataset.