Bugfix to UpdateSeuratPrototype.R

bbimber · bbimber · commit 962ddcc24367 · 2025-08-18T08:11:30.000-07:00
diff --git a/singlecell/resources/chunks/UpdateSeuratPrototype.R b/singlecell/resources/chunks/UpdateSeuratPrototype.R
@@ -43,7 +43,7 @@ for (datasetId in names(seuratObjects)) {
   if (saveRepertoireStats) {
     seuratObj <- readSeuratRDS(seuratObjects[[datasetId]])
     outputFile <- gsub(seuratObjects[[datasetId]], pattern = '.rds', replacement = '.tcrStats.txt')
-    df <- Rdiscvr::CalculateAndStoreTcrRepertoireStats(seuratObj, outputFile = outFile)
+    df <- Rdiscvr::CalculateAndStoreTcrRepertoireStats(seuratObj, outputFile = outputFile)
   }
 
   if (scoreActivation) {

Original file line number	Diff line number	Diff line change
`@@ -43,7 +43,7 @@ for (datasetId in names(seuratObjects)) {`
`43`	`43`	`if (saveRepertoireStats) {`
`44`	`44`	`seuratObj <- readSeuratRDS(seuratObjects[[datasetId]])`
`45`	`45`	`outputFile <- gsub(seuratObjects[[datasetId]], pattern = '.rds', replacement = '.tcrStats.txt')`
`46`		`- df <- Rdiscvr::CalculateAndStoreTcrRepertoireStats(seuratObj, outputFile = outFile)`
	`46`	`+ df <- Rdiscvr::CalculateAndStoreTcrRepertoireStats(seuratObj, outputFile = outputFile)`
`47`	`47`	`}`
`48`	`48`
`49`	`49`	`if (scoreActivation) {`