R Notebook

library(readxl)

#use current working directory
getwd()

[1] "/cloud/project"

# Identify file names
data_files <- list.files("C:/Users/Crystal/Desktop/My Folder/") 


# Print file names
head(data_files)

character(0)

#Write a for-loop using the assign, paste0, and read_excel functions to read and save all files in the directory:

for(i in 1:length(data_files)) {                              
  assign(paste0("Infusion_", i),                                   
         read_excel(paste0("C:/Users/Crystal/Desktop/My Folder/", data_files[i]), sheet = 8))
}

Error: `path` does not exist: ‘C:/Users/Crystal/Desktop/My Folder/NA’