在整数变量上进行子集化时的警告消息

时间:2015-04-09 21:01:03

标签: r label shiny

我有一个小小的闪亮应用程序,我将变量名称显示为checkboxGroupInput,并根据选择我将数据表子集化为仅这些变量并显示它。

我观察到当选择带有标签的Integer类型变量时,RStudio控制台上会出现一条警告消息:

Warning in formatC(x = c(36L, 29L, 20L, 25L, 48L, 42L, 19L, 26L, 36L, 39L,  :
  class of 'x' was discarded

如果我在data.table中将变量类型更改为字符(在这种情况下标签已消失),则警告消失 - 这些警告消息是什么意思,如何在不更改列类型的情况下摆脱它们? 这是我的代码:

 Server.R
  library(shiny)
  dft<-data.table(name=c("a","b","c"),age=c(10L,12L,13L))
  label(dft$name)<-"Full Name"
  label(dft$age)<-"Age of patient"
  shinyServer(function(input, output) {
     output$x<- renderUI({
     checkboxGroupInput("g1","g1label",names(dft))
   })
  output$y<- renderTable({
    if (length(input$g1 > 0))
     {subset(dft,select=c(as.vector(input$g1)))}
  })
 })

 ui.R
  library(shiny)
  shinyUI(fluidPage(
     uiOutput("x")  ,
     tableOutput("y")
  ))

0 个答案:

没有答案