context("write_sheet")
sheet = read_sheet(system.file("extdata/example.xlsx", package = "params"))
test_that("We can write an excel sheet", {
## read a excel sheet
write_sheet(sheet, "example2.xlsx")
})
test_that("We can write an CSV sheet", {
## read a excel sheet
write_sheet(sheet, "example2.csv")
})
test_that("We can write an tsv sheet", {
## read a excel sheet
write_sheet(sheet, "example2.tsv")
})
# END
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.