Question

我＆＃39;尝试通过插入pch的输入来修改plot的{{1}}参数：

selectInput

到

selectInput("points", "Points:",
                list("Job lost" = "joblost",
                     "Sex" = "sex",                  
                ))

不幸的是，我收到了一个错误：无法强制类型＆＃39;关闭＆＃39;到'＆＃39; double＆＃39;类型的向量。我应该采取什么措施来解决这个问题？当然，工作和性别都是因素。完整代码：

output$Plot <- renderPlot({
    plot(as.formula(formula()),data=Benefits,
         main  = caption(), pch = as.numeric(input$points), 
         col=as.numeric(input$points))
})

Answer 1

使用selectInput中的开关

解决了该问题

 pkt <- reactive({
    switch(input$points,
           "Powod utraty pracy" = joblost,
           "Plec" = sex,
           "Nie-bialy" = nwhite,
           ">12 lat szkoly" = school12,
           "Robotnik fizyczny" = bluecol,
           "Mieszka w miescie" = smsa,
           "Zonaty" = married,
           "Ma dzieci" = dkids,
           "Male dzieci" = dykids,
           "Glowa rodziny" = head,
           "Otrzymuje zasilki" = ui)
  })

  txt <- renderText({paste(input$points)})

  output$Plot <- renderPlot({
    plot(as.formula(formula()),data=Benefits,
         main  = caption(), pch = as.numeric(pkt()), 
         col=as.numeric(pkt()))

R闪亮不能强迫类型＆＃39;关闭＆＃39;到'＆＃39; double＆＃39;类型的向量

1 个答案: