我的checkboxinput值不起作用

Question

我有一个小小的闪亮应用程序，当变量＆＃39; logEch＆＃39;是＆＃34; x＆＃34;。

这有效：

output$plot <- renderPlot({
    logEch<-"x"
    Plotfigure(XHydrau,DataQs, ParHydrau, Rescal,logEch)
})

但是当我影响价值＆＃34; x＆＃34;来自inputcheckbox＆＃39; xlog＆＃39;：

output$plot <- renderPlot({
  if(input$xlog){logEch<-"x"}
  Plotfigure(XHydrau,DataQs, ParHydrau, Rescal,logEch)
})

我收到错误消息：argument is of length zero

我需要做些什么来解决这个问题？

Answer 1

由于你还没有发布reproducible example，我只能假设问题出在哪里......

我想你需要扩展你的if语句 - ＆gt;必须有if ... else ...参数！

所以我会添加到renderPlot：

if(input$xlog){logEch<-"x"}else{NULL}