Shiny outputとR MarkDown render_site（）

Question

render_site（）（rmarkdownパッケージ）を使用して2ページのサイトをエクスポートしようとすると、R MarkDownドキュメントのShiny出力を使用する際の問題に直面しています

処理、render_site（）は、「出力」のオブジェクトが定義されていないことを私に告げるとき

uiOutput("main") 

output$main <- renderUI({ 
    if(test$n != 0){ 
    plotOutput("mainPlot", height = test$n*length(input$yAxes)*400) 
    } 
}) 

output$mainPlot <- renderPlot({do.call("grid.arrange", c(test$plots, ncol = 1))}) 

：ここ

は私の問題を（knitrまたは.Rmd文書の一つの中にある）を作成したコードの塊です。 .Rmdファイルだけを実行すると正常に動作します。この問題はウェブサイトとして含めるときにのみ表示されます。 最後に、上記の行を削除すると、Webサイトが正常に作成されます。

出力$ fooはR MarkDownでサポートされていませんか、何かダムがありませんか？

はあなたに事前に非常に感謝し、

よろしく、 ポール

---

PS：私は明らかに尋ねる前に検索、私は._今時間のためにこれを把握しようとしてきました。

Answer 1

出力生成コードを関数に入れてみましたか？

server <- function (input, output) { 
    output$main <- renderUI({ 
    if(test$n != 0){ 
    plotOutput("mainPlot", height = test$n*length(input$yAxes)*400) 
    } 
    }) 

    output$mainPlot <- renderPlot({do.call("grid.arrange", c(test$plots, ncol = 1))}) 
}