Mercurial > repos > greg > create_genome_tracks

comparison create_genome_tracks.R @ 7:b090efba1fe1 draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author greg
date Fri, 10 Nov 2017 14:16:14 -0500
parents d46bbaa386de
children
comparison
equal deleted inserted replaced
6:d46bbaa386de 7:b090efba1fe1
165 track_db = c(track_db, ""); 165 track_db = c(track_db, "");
166 } 166 }
167 167
168 # Write the outputs. 168 # Write the outputs.
169 write.table(track_db, opt$output_track_db, quote=F, row.names=F, col.names=F); 169 write.table(track_db, opt$output_track_db, quote=F, row.names=F, col.names=F);
170 write.table(c(paste("genome", opt$build), opt$output_build, paste(tracks_output_dir, "genomes_", opt$hub_id, ".txt", sep=""), quote=F,row.names=F,col.names=F); 170 write.table(c(paste("genome", opt$build), opt$output_build), paste(tracks_output_dir, "genomes_", opt$hub_id, ".txt", sep=""), quote=F, row.names=F, col.names=F);
171 write.table(c(paste("hub", opt$hub_id), paste("shortLabel", opt$hub_id), paste("longLabel", opt$hub_name), paste("genomesFile genomes_", opt$hub_id, ".txt", sep=""), "email yzz2 at psu.edu"), opt$output_hub, quote=F, row.names=F, col.names=F); 171 write.table(c(paste("hub", opt$hub_id), paste("shortLabel", opt$hub_id), paste("longLabel", opt$hub_name), paste("genomesFile genomes_", opt$hub_id, ".txt", sep=""), "email yzz2 at psu.edu"), opt$output_hub, quote=F, row.names=F, col.names=F);