我正在尝试将checkboxgroupinput值中的值添加到闪亮应用程序中名为surv_data的数据框中。
以下是复选框的代码:
checkboxGroupInput(inputId = "variables", label = "",
choices = c(
"Covariate 1" = "cov1",
"Covariate 2" = "cov2"
),
selected = c('cov1', 'cov2'))
下面是我将变量合并到一个数据框中的地方:
surv_data <- reactive({
raw_surv <- raw_surv_data()
data.frame(
Time = raw_surv[[input$Time]],
Treatment = raw_surv[[input$Treatment]],
endpoint = raw_surv[[input$Endpoint]]
)
})
我需要以某种方式将值cov1和cov2添加到下面的行下面:
endpoint = raw_surv[[input$Endpoint]]
我尝试添加variables = raw_surv[[input$variables]]
,但不幸的是这不起作用。任何帮助都将不胜感激。
发布于 2019-06-04 03:02:12
也许吧
surv_data <- reactive({
raw_surv <- raw_surv_data()
cbind(
data.frame(
Time = raw_surv[[input$Time]],
Treatment = raw_surv[[input$Treatment]],
endpoint = raw_surv[[input$Endpoint]]
),
raw_surv[input$variables]
)
})
https://stackoverflow.com/questions/56432916
复制相似问题