git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/crlmm@52838 bc3139a8-67e5-0310-9ffc-ced21a209358
... | ... |
@@ -1123,13 +1123,12 @@ genotype.Illumina = function(sampleSheet=NULL, |
1123 | 1123 |
pkgname = getCrlmmAnnotationName(cdfName) |
1124 | 1124 |
# if(missing(outdir)) |
1125 | 1125 |
# stop("Must specify a directory to store large data objects") |
1126 |
- callSet = construct.Illumina(sampleSheet=sampleSheet, arrayNames=arrayNames, |
|
1127 |
- ids=ids, path=path, arrayInfoColNames=arrayInfoColNames, |
|
1128 |
- highDensity=highDensity, sep=sep, fileExt=fileExt, |
|
1129 |
- cdfName=cdfName, copynumber=copynumber, verbose=verbose, batch=batch, # fns=fns, |
|
1130 |
- saveDate=saveDate) #, outdir=outdir) |
|
1126 |
+ callSet <- construct.Illumina(sampleSheet=sampleSheet, arrayNames=arrayNames, |
|
1127 |
+ ids=ids, path=path, arrayInfoColNames=arrayInfoColNames, |
|
1128 |
+ highDensity=highDensity, sep=sep, fileExt=fileExt, |
|
1129 |
+ cdfName=cdfName, copynumber=copynumber, verbose=verbose, batch=batch, # fns=fns, |
|
1130 |
+ saveDate=saveDate) #, outdir=outdir) |
|
1131 | 1131 |
if(missing(sns)) sns = sampleNames(callSet) |
1132 |
- |
|
1133 | 1132 |
if(is.lds) { |
1134 | 1133 |
open(A(callSet)) |
1135 | 1134 |
open(B(callSet)) |
... | ... |
@@ -1328,4 +1327,4 @@ processIDAT = function(sel, sampleSheet=NULL, |
1328 | 1327 |
rm(res) |
1329 | 1328 |
gc() |
1330 | 1329 |
TRUE |
1331 |
- } |
|
1332 | 1330 |
\ No newline at end of file |
1331 |
+ } |