Nothing
## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ----example------------------------------------------------------------------
library(convertxlsform)
path <- system.file("extdata", "all_types", "all_types.xlsx",
package = "convertxlsform")
basename(path)
## ----languages----------------------------------------------------------------
xlsform_languages(path)
## ----outline------------------------------------------------------------------
outline <- xlsform_outline(path)
nrow(outline)
head(outline[, c("serial", "block", "kind", "name", "relevant_text")], 10)
## ----docx---------------------------------------------------------------------
docx <- convertxlsform(path, output = tempdir(), overwrite = TRUE,
verbose = FALSE)
basename(docx)
file.exists(docx)
## ----docx-fr------------------------------------------------------------------
docx_fr <- convertxlsform(path, output = file.path(tempdir(), "all_types_fr.docx"),
lang = "fr", overwrite = TRUE, verbose = FALSE)
basename(docx_fr)
## ----pdf, eval = FALSE--------------------------------------------------------
# pdf <- convertxlsform(path, output = tempdir(), format = "pdf",
# overwrite = TRUE, verbose = FALSE)
# basename(pdf)
# file.exists(pdf)
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.