Как конвертировать дату через функцию hot_to_r - PullRequest
Новая
       76

Как конвертировать дату через функцию hot_to_r

0 голосов
/ 22 октября 2018

Я пытаюсь преобразовать объект rhandsontable в объект r с помощью hot_to_r, но я решил, что в моей таблице есть столбец даты, и из-за этого я получаю сообщение об ошибке «нет метода или значения по умолчанию для приведения« символа »к« NA »". Я попытался удалить столбец даты и без него, он работает нормально. Любая идея, что мне сделать, чтобы это исправить?

вот пример кода, который сталкивается с той же проблемой 

library(shiny)
library(shinydashboard)
library(rhandsontable)

ui <- dashboardPage(skin = 'green',

      dashboardHeader( title = "TD Securities", titleWidth = 280),

      dashboardSidebar(width = 280  ),

      dashboardBody( 

      fluidRow(

      column(4,
      helpText("editable table"),
      rHandsontableOutput("table"),
      br(),
      actionButton("saveBtn","Save"))


      )))

server <- shinyServer(function(input, output) {

  # creat a table with date column

  mtcars1<- transform(mtcars,date = Sys.Date())

  # returns rhandsontable type object - editable excel type grid data
  output$table <- renderRHandsontable({

    rhandsontable( mtcars1) # converts the R dataframe to rhandsontable object 
  })

  # on click of button the file will be saved to the working directory
  observeEvent(input$saveBtn, {

               write.csv(hot_to_r(), file = "MyData.csv",row.names = FALSE)})

  # hot_to_r() converts the rhandsontable object to r data object

})

shinyApp(ui, server)
...