Mercurial > repos > jeremyjliu > region_motif_enrichment
changeset 36:b868314320e2 draft
Uploaded
author | jeremyjliu |
---|---|
date | Fri, 06 Mar 2015 13:24:03 -0500 |
parents | 4ce22698acb0 |
children | 76e108a19e64 |
files | region_motif_compare.r region_motif_intersect.r |
diffstat | 2 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/region_motif_compare.r Thu Feb 26 22:54:09 2015 -0500 +++ b/region_motif_compare.r Fri Mar 06 13:24:03 2015 -0500 @@ -23,7 +23,7 @@ # Set common and data directories args <- commandArgs() workingDir = args[7] -pwmFile = args[8].split(',')[0] # If duplicate entires, take first one +pwmFile = unlist(strsplit(args[8], ','))[1] # If duplicate entires, take first one # Set input and reference files inTab1 = args[9]
--- 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]