Mercurial > repos > davidvanzessen > clonal_sequences_in_paired_samples

diff RScript.r @ 17:7a9debac9a97 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author davidvanzessen
date Thu, 05 Feb 2015 08:22:19 -0500
parents d137974763b3
children f23d3be6fbc8
line wrap: on
line diff
--- a/RScript.r	Thu Feb 05 07:57:29 2015 -0500
+++ b/RScript.r	Thu Feb 05 08:22:19 2015 -0500
@@ -20,7 +20,6 @@
 dat$Related_to_leukemia_clone = F
 
 setwd(outDir)
-write(paste("TMP='", outDir, "'"), file=file.path(Sys.getenv('R_USER'), '.Renviron'))
 cat("<tr><td>Selecting first V/J Genes</td></tr>", file=logfile, append=T)
 dat$V_Segment_Major_Gene = as.factor(as.character(lapply(strsplit(as.character(dat$V_Segment_Major_Gene), "; "), "[[", 1)))
 dat$J_Segment_Major_Gene = as.factor(as.character(lapply(strsplit(as.character(dat$J_Segment_Major_Gene), "; "), "[[", 1)))