cat(colnames(x), sep='",\n"')
df <-data.frame(col_name = colnames(x), types = sapply(x, class))
df %>% dplyr::select(col_name, types) %>% knitr::kable(row.names = FALSE)
x %>% knitr::kable()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.