| ... | ... |
@@ -426,6 +426,7 @@ setMethod( |
| 426 | 426 |
} |
| 427 | 427 |
} |
| 428 | 428 |
runParams$batch <- batch |
| 429 |
+ runParams$batchBackground <- batchBackground |
|
| 429 | 430 |
batchIndex <- unique(batch) |
| 430 | 431 |
|
| 431 | 432 |
## Set result lists upfront for all cells from different batches |
| ... | ... |
@@ -458,7 +459,7 @@ setMethod( |
| 458 | 459 |
|
| 459 | 460 |
zBat <- NULL |
| 460 | 461 |
countsBat <- counts[, batch == bat] |
| 461 |
- bgBat <- countsBackground[, batchBackgound == bat] |
|
| 462 |
+ bgBat <- countsBackground[, batchBackground == bat] |
|
| 462 | 463 |
|
| 463 | 464 |
## Convert to sparse matrix |
| 464 | 465 |
if (!inherits(countsBat, "dgCMatrix")) {
|
