Schleife zum Umwandeln von Dateien

Question

Ich habe viele Dateien, die ich von sas7bdat zu Rds mit R konvertieren will, ich den folgenden Code verwenden:

name <- read_sas("C:/Users/Desktop/Files/name.sas7bdat") 
saveRDS(name, file = "C:/Users/Desktop/RDSfiles/name.Rds") 

aber es gibt zu viele Dateien, die ich auf eine Schleife verwenden mag Optimieren, um irgendwelche Ideen zu verarbeiten?

Vielen Dank !!

Answer 1

Dieses einfache Schleife, die ich verwenden würde:

path_sas7bdat <- "C:/Users/Desktop/Files/" 
path_RDS <- "C:/Users/Desktop/RDSfiles/" 

files <- list.files(path_sas7bdat, pattern = "sas7bdat") 

for(i in files) { 
    saveRDS(read_sas(paste0(path_sas7bdat, i)), 
      paste0(path_RDS, gsub("sas7bdat", "RDS", i))) 
} 

PS collapse = FALSE für Geschwindigkeit .: überprüfen saveRDS Option.