Use named SDA arguments

bbimber · bbimber · commit 645290c9a0b8 · 2023-01-06T12:25:27.000-08:00
diff --git a/singlecell/resources/chunks/RunSDA.R b/singlecell/resources/chunks/RunSDA.R
@@ -23,7 +23,7 @@ sdaFiles <- data.frame(DatasetId = character(), FileName = character())
     sdaResults$OutputFileId <- outputFileId
 
     if (!all(is.null(fieldNames))) {
-       PlotSdaCellScores(seuratObj, sdaResults, fieldNames = fieldNames)
+       CellMembrane::PlotSdaCellScores(sdaResults = sdaResults, seuratObj = seuratObj, fieldNames = fieldNames)
     }
 
     fileName <- paste0('sda.', datasetId, '.rds')

Original file line number	Diff line number	Diff line change
`@@ -23,7 +23,7 @@ sdaFiles <- data.frame(DatasetId = character(), FileName = character())`
`23`	`23`	`sdaResults$OutputFileId <- outputFileId`
`24`	`24`
`25`	`25`	`if (!all(is.null(fieldNames))) {`
`26`		`- PlotSdaCellScores(seuratObj, sdaResults, fieldNames = fieldNames)`
	`26`	`+ CellMembrane::PlotSdaCellScores(sdaResults = sdaResults, seuratObj = seuratObj, fieldNames = fieldNames)`
`27`	`27`	`}`
`28`	`28`
`29`	`29`	`fileName <- paste0('sda.', datasetId, '.rds')`