我想使用閃亮的動態創建繪圖的應用程序添加到頁面。它可能是10個地塊，也可能只有一個。我在動態UI的閃亮主頁中使用了本教程。這是一個簡化的示例。該函數showme正在繪制圖形服務器shinyServer(function(input, output) {  # Create an environment for storing data  symbol_env <- new.env()  # Make a chart for a symbol, with the settings from the inputs  make_chart <- function(symbol) {    showme(symbol)  }  display <- c("1083484" , "1101732")  output$MyList <- renderUi({     for (i in i:nrow(display))       renderPlot({make_chart(display[i])})    })})用戶界面shinyUI(pageWithSidebar(  headerPanel("My Plots !"),  sidebarPanel(    wellPanel(      p(strong("Scan1")))) ,mainPanel(      uiOutput("MyList"))))我收到以下錯誤Listening on port 8100Error in .subset2(x, "impl")$defineOutput(name, value, deparse(substitute(value))) :   Unexpected character output for display如果不是這樣-我將不勝感激。謝謝。> sessionInfo()R version 2.15.3 (2013-03-01)Platform: i386-w64-mingw32/i386 (32-bit)