Create and Save Excel Files with Supplementary Tables

This function creates and saves Excel files from given spreadsheet objects.

Usage

excelerate(...)

Arguments

...

One or more spreadsheet objects created with spreadsheet().

Examples

temp_dir <- tempdir()

results <- append_meta(
  results = iris,
  colname_descriptions = c(
    "Sepal.Length" = "Length of the sepal in cm",
    "Sepal.Width" = "Width of the sepal in cm",
    "Petal.Length" = "Length of the petal in cm",
    "Petal.Width" = "Width of the petal in cm",
    "Species" = "Species of iris"
  )
)

sheet1 <- sheet(results, "Sheet A", "Legend A")
sheet2 <- sheet(results, "Sheet B", "Legend B")

sp <- spreadsheet(
  "Supplementary Table X",
  file.path(temp_dir, "example.xlsx"),
  sheet1, sheet2
)

excelerate(sp)
#> [[1]]
#> [1] 1
#> 

# Clean up the temporary files
unlink(file.path(temp_dir, "example.xlsx"))