## For demo, a temp. file path is created with the file extension .xlsx
xlsx_file <- tempfile(fileext = ".xlsx")
export(
list(
mtcars1 = mtcars[1:10, ],
mtcars2 = mtcars[11:20, ],
mtcars3 = mtcars[21:32, ]
),
xlsx_file
)
# import a single file from multi-object workbook
import(xlsx_file, sheet = "mtcars1")
# import all worksheets, the return value is a list
import_list(xlsx_file)
library('datasets')
export(list(mtcars1 = mtcars[1:10,],
mtcars2 = mtcars[11:20,],
mtcars3 = mtcars[21:32,]),
xlsx_file <- tempfile(fileext = ".xlsx")
)
# import all worksheets
list_of_dfs <- import_list(xlsx_file)
# re-export as separate named files
## export_list(list_of_dfs, file = c("file1.csv", "file2.csv", "file3.csv"))
# re-export as separate files using a name pattern; using the names in the list
## This will be written as "mtcars1.csv", "mtcars2.csv", "mtcars3.csv"
## export_list(list_of_dfs, file = "%s.csv")
Run the code above in your browser using DataLab