checkboxGroupInput - Shinyの文字列で複数の関数を実行

Question

たとえば、数字が#1, #2, and #3の3種類の異なる "関数" fun1(),fun2() and fun3()があるとします。

checkboxGroupInput("selec",label = h3("Select function"), 
choices = list("fun1" = 1,"fun2" = 2, "fun3" = 3)) 

、私は「機能」私は（一度に1）を選択しますが、どのように私は私が選択したすべてのものを実行することができますを実行することができます？

：私は光沢で、次のオプションを使用する場合

例えば

私はfun1 and fun3を選択した場合、私はfun1 and fun2を選択した場合、私は機能#1 and #2

の出力をしたい機能 #1 and #3

の出力をしたいです210

私は、すべての出力

は私が（配列を反復処理のため）と sapply()（関数呼び出しのための） do.callの組み合わせをお勧めします

Answer 1

助けてくれてありがとう、私が欲しい、それらすべてを選択した場合以下を参照してください。

fun1 <- function() return("#1") 
fun2 <- function() return("#2") 
fun3 <- function() return("#3") 

library(shiny) 
ui <- fluidPage(
    checkboxGroupInput("functions", "Choose functions:", 
        choiceNames = 
         list("fun1", "fun2", "fun3"), 
        choiceValues = 
         list("fun1", "fun2", "fun3") 
), 
    textOutput("txt") 
) 

server <- function(input, output, session) { 
    output$txt <- renderText({ 
    print(sapply(input$functions, do.call, args = list())) 
    }) 
} 

shinyApp(ui, server)