RShiny download data frame as html instead of csv

[cagla]

Hello,

I am trying to download a dtaframe as csv file but when I press download button, I come up with an html file. Could you please help me to download a csv file? My code is below

Thank you

ui:

  downloadButton(outputId = "clean_download", label = "Download cleaned data")

server:

output$clean_download <- downloadHandler(
  filename =  function() {
    paste('clean_data.csv', sep='')
  },
  # content is a function with argument file. content writes the plot to the device
  content = function(filename) {
   write.csv(as.data.frame(train_cleaned()), filename, row.names=FALSE)
    
  } 
)

[nirgrahamuk]

@cagla

as.data.frame(train_cleaned())

I expect that happens when the above struggle.
What is train_cleaned() before you cast it to a data.frame ?
You can peek at your objects in the console, a tradition as old as programming :

  content = function(filename) {
print(head(as.data.frame(train_cleaned()))
   write.csv(as.data.frame(train_cleaned()), filename, row.names=FALSE)
  }

[cagla]

train_cleaned() is subset of a data frame and it's type is "list"

[cagla]

I tried using write.csv(train_cleaned) outside of shiny and it worked properly, however when I try to use it with downloadHandler, a HTML file is downloaded instead of csv file.

[nirgrahamuk]

I would expect a subset from a data.frame to be a dataframe and not a list... what method of subsetting are you doing?

[nirgrahamuk]

Did you add print head and monitor that in your console ? You haven't shared the console output for me to make an opinion on.

Another way to approach this is for you to make a reprex.

please have a look at this guide, to see how to create one:

FAQ: How to do a minimal reproducible example ( reprex ) for beginners

A minimal reproducible example consists of the following items: A minimal dataset, necessary to reproduce the issue The minimal runnable code necessary to reproduce the issue, which can be run on the given dataset, and including the necessary information on the used packages. Let's quickly go over each one of these with examples: Minimal Dataset (Sample Data) You need to provide a data frame that is small enough to be (reasonably) pasted on a post, but big enough to reproduce your issue. Let's say, as an example, that you are working with the iris data frame head(iris) #> Sepal.Length Sepal.Width Petal.Length Petal.Width Species #> 1 5.1 3.5 1.4 0.…

[cagla]

subset command:
train_cleaned=reactive({subset(train_sub(),!(rownames(train_sub()) %in% train_outlier_rownames()$rownumber))})

generated data frame from head(as.data.frame(train_cleaned))

[cagla]

When I open the app in web browser instead of R Studio viewer, it worked properly. I could download the file in csv format . It is strange