Mercurial > repos > stef > qdnaseq
comparison QDNAseq.R @ 45:945d3f371e1a draft
Uploaded
author | stef |
---|---|
date | Sun, 03 Aug 2014 11:25:59 -0400 |
parents | 4351c7715275 |
children | 8434589e692c |
comparison
equal
deleted
inserted
replaced
44:4372afee310b | 45:945d3f371e1a |
---|---|
175 | 175 |
176 systemUser <- system("whoami",T) | 176 systemUser <- system("whoami",T) |
177 qdnaseqVersion <- packageDescription( "QDNAseq" )$Version | 177 qdnaseqVersion <- packageDescription( "QDNAseq" )$Version |
178 catMsg( c("Analysis run with user: ", systemUser ) ) | 178 catMsg( c("Analysis run with user: ", systemUser ) ) |
179 catMsg( c("QDNAseq version loaded: ", qdnaseqVersion) ) | 179 catMsg( c("QDNAseq version loaded: ", qdnaseqVersion) ) |
180 catMsg( c( sessionInfo()$R.version$version.string ) ) | |
180 | 181 |
181 ## get the comma separated list of chromosomes to exclude | 182 ## get the comma separated list of chromosomes to exclude |
182 excludeChrs <- unlist( strsplit( excludeChrsString, ",") ) | 183 excludeChrs <- unlist( strsplit( excludeChrsString, ",") ) |
183 | 184 |
184 ## ------------------------ | 185 ## ------------------------ |