Ensure savedSeuratObjects.txt is always created

bbimber · bbimber · commit d669f932d78f · 2022-11-09T08:20:18.000-08:00
diff --git a/singlecell/resources/chunks/Functions.R b/singlecell/resources/chunks/Functions.R
@@ -64,6 +64,7 @@ savedFiles <- data.frame(datasetId = character(), datasetName = character(), fil
 if (file.exists('/work/savedSeuratObjects.txt')) {
     unlink('/work/savedSeuratObjects.txt')
 }
+file.create('/work/savedSeuratObjects.txt', )
 
 saveData <- function(seuratObj, datasetId) {
     print(paste0('Saving dataset: ', datasetId))

Original file line number	Diff line number	Diff line change
`@@ -64,6 +64,7 @@ savedFiles <- data.frame(datasetId = character(), datasetName = character(), fil`
`64`	`64`	`if (file.exists('/work/savedSeuratObjects.txt')) {`
`65`	`65`	`unlink('/work/savedSeuratObjects.txt')`
`66`	`66`	`}`
	`67`	`+file.create('/work/savedSeuratObjects.txt', )`
`67`	`68`
`68`	`69`	`saveData <- function(seuratObj, datasetId) {`
`69`	`70`	`print(paste0('Saving dataset: ', datasetId))`