Quiero exportar una tabla de datos a Excel en R Shiny. Para este propósito, quiero usar el botón de exportación que está disponible en la tabla de datos. La tabla consta de columnas formateadas con formatCurrency() . Algunas de esas columnas contienen un símbolo del euro y otras un símbolo de porcentaje.
Sin embargo, estas columnas causan problemas cuando la tabla se exporta a Excel. En Excel, no son numéricos, sino cadenas. Pero quiero que sean numéricos. Es decir, deben estar dispuestos a la derecha y no a la izquierda. Pero el formato no debe cambiar.
Aquí hay un ejemplo que muestra el problema:
library(shiny) library(DT) ui <- fluidPage( DTOutput("table") ) server <- function(input, output, session) { output$table <- renderDT({ datatable(mtcars * 1000, rownames = FALSE, extensions = "Buttons", options = list( dom = "Bfrtip", buttons = list( list( extend = "excel", text = "<i class='fa fa-file-excel-o'></i> Excel", filename = "Data", title = NULL ) ) ) ) %>% formatCurrency( 1:6, currency = "\u20AC", digits = 2, mark = ".", dec.mark = ",", before = FALSE ) %>% formatCurrency( 7:11, currency = "\u0025", digits = 3, mark = ".", dec.mark = ",", before = FALSE ) }) } shinyApp(ui, server)Por favor, hágamelo saber, si necesito entregar más información.