Mercurial > repos > jeremyjliu > region_motif_enrichment

diff region_motif_intersect.r @ 36:b868314320e2 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author jeremyjliu
date Fri, 06 Mar 2015 13:24:03 -0500
parents 4ce22698acb0
children 76e108a19e64
line wrap: on
line diff
--- a/region_motif_intersect.r	Thu Feb 26 22:54:09 2015 -0500
+++ b/region_motif_intersect.r	Fri Mar 06 13:24:03 2015 -0500
@@ -16,8 +16,8 @@
 
 # Retrive motif database path
 args <- commandArgs()
-motifDB_bgz = args[7].split(',')[0] # Handles duplicate entries in data table
-motifDB_tbi = args[8].split(',')[0] # Just takes the first one
+motifDB_bgz = unlist(strsplit(args[7], ','))[1] # Handles duplicate entries in data table
+motifDB_tbi = unlist(strsplit(args[8], ','))[1] # Just takes the first one
 
 # Set input and reference files, comment to toggle commmand line arguments
 inBed = args[9]