... |
... |
@@ -1328,7 +1328,7 @@ processIDAT = function(sel, sampleSheet=NULL,
|
1328 |
1328 |
open(RG@assayData$R); open(RG@assayData$G); open(RG@assayData$zero)
|
1329 |
1329 |
delete(RG@assayData$R); delete(RG@assayData$G); delete(RG@assayData$zero); rm(RG)
|
1330 |
1330 |
gc()
|
1331 |
|
- if (missing(sns)) sns = sampleNames(XY)
|
|
1331 |
+ if (missing(sns) || length(sns)!=ncol(XY)) sns = sampleNames(XY)
|
1332 |
1332 |
|
1333 |
1333 |
res = preprocessInfinium2(XY, mixtureSampleSize=mixtureSampleSize, fitMixture=TRUE, verbose=verbose,
|
1334 |
1334 |
seed=seed, eps=eps, cdfName=cdfName, sns=sns, stripNorm=stripNorm, useTarget=useTarget)
|