Here's my code below. I don't know why scaling the data gives me an error. Any help will be appreciated. Thank you

ctrl.data <- Read10X(data.dir = "/Users/kech/Desktop/stim")

stim.data <- Read10X(data.dir = "/Users/kech/Desktop/stim")

ctrl.data <- Read10X(data.dir = "/Users/kech/Desktop/ctrl")
 
stim.data <- Read10X(data.dir = "/Users/kech/Desktop/stim")
 
ctrl <- CreateSeuratObject(raw.data = ctrl.data, project = "ASTHMA_CTRL", min.cells = 5)
 
ctrl@meta.data$stim <- "CTRL"
 
ctrl <- FilterCells(ctrl, subset.names = "nGene", low.thresholds = 500, high.thresholds = Inf)

ctrl <- NormalizeData(ctrl)

ctrl <- ScaleData(ctrl, display.progress = F)

Error in if (display.progress) { : 
 argument is not interpretable as logical
In addition: Warning message:
In if (display.progress) { :the condition has length > 1 and only the first element will be used
Does setting `display.progress = FALSE` instead of `display.progress = F` help? Looks like you might have defined F already before this...