Download csv from table in flexdashboard

[vincenzovvv]

Hi there,

I am using flexdashboard in order to create some basic reporting.

After retrieving the data and some manipulation in dplyr, I use kable() in order to render a nice and clean table as follow:

I host the dashboard on shinyapps.

I would like to give the end user the possibility to download the table in a csv format.

I know it is possible to do it in shiny; is there any way to do this using flexdashboard?

[apreshill]

With plain HTML output, you could try the xfun package:

One Little Thing: Embed a File in the HTML Output of R Markdown - Yihui Xie |...

```{r install}
devtools::install_github('yihui/xfun')
# embed_file() requires a few more packages
xfun::pkg_load2(c('base64enc', 'htmltools', 'mime'))
```

```{r echo=FALSE}
# a single file
xfun::embed_file('source.Rmd')

# multiple files
xfun::embed_files(c('source.Rmd', 'data.csv'))

# a directory
xfun::embed_dir('data/', text = 'Download full data')
```