ft1 <- flextable(head(iris))
tf1 <- tempfile(fileext = ".html")
save_as_html(ft1, path = tf1)
# browseURL(tf1)
ft2 <- flextable(head(mtcars))
tf2 <- tempfile(fileext = ".html")
save_as_html(
`iris table` = ft1,
`mtcars table` = ft2,
path = tf2,
title = "rhoooo"
)
# browseURL(tf2)
Run the code above in your browser using DataLab