Rの入力としてggplot2関数を渡すShiny

Question

（gomplot（）、geom_boxplot（）などで表示するggplotグラフの種類をユーザーに選択させたいが、 "function"関数の文字列ではありません。

私の入力の1つは、次のようになります。

selectInput("graph_type", "Select graph type", 
     c("geom_point()", "geom_boxplot()"), selected = NULL, multiple = FALSE, 
     selectize = TRUE, width = NULL, size = NULL) 

、出力は次のようになります。

output$p1 = renderPlot({ 
    ggplot(raw, aes(x=raw[,input$x1], y=raw[,input$y1])) +input$graph_type 

そして、私はこのようなルックスを取得エラー：

Error: Don't know how to add input$graph_type to a plot

缶誰かが私を助けますか？ありがとう！

P.S.コード内の他のすべてが動作すると仮定します。必要に応じてスクリプト全体を提供することができます。

Answer 1

getを使用すると、オブジェクトの名前で値を返すことができます。

ggplot(raw, aes(x=raw[,input$x1], y=raw[,input$y1])) + 
    get(input$graph_type)()