2
此處已經詢問此問題(Using 2 htmlwidgets in 1 R-Shiny Application)。我面臨着同樣的問題,無法找到解決方案,因此將其作爲具有可重現示例的新問題發佈。在1 r閃亮應用程序中使用2個HTML小部件
我已經使用d3創建了兩個htmlwidgets。我試圖在同一個閃亮的應用程序中使用它們,但我一次只能使用一個。請參考下面的可重複的例子:
#library(devtools)
#install_github('radhikesh/d3Histogram')
#install_github('radhikesh/d3WordCloudWidget')
library(shiny)
library(d3Histogram)
library(d3WordCloudWidget)
ui <- shinyUI(fluidPage(
fluidRow(
column(width = 6, d3HistogramOutput("d3Hist"))),
fluidRow(
column(2, d3WordCloudWidgetOutput(
"d3Cloud", width = "80%", height = 600
)))
))
server <- shinyServer(function(input, output) {
output$d3Hist <- renderD3Histogram({
dataset <- data.frame(lpu = c('Apple','Banana','Orange'), amount =
c(20,10,15))
d3Histogram(dataset = dataset)
})
output$d3Cloud <- renderd3WordCloudWidget({
dm1 <-data.frame(Var1 = c('Apple','Banana','Orange'), Freq = c(20,10,15))
dm1$Var1 <- as.character(dm1$Var1)
d3WordCloudWidget(dm1$Var1, dm1$Freq)
})
})
# Run the application
shinyApp(ui = ui, server = server)
在測試我的可重複的例子,請評論在UI部分d3HistogramOutput或d3WordCloudWidgetOutput輸出中的任何一個,你可以看到,只有小部件的一個工作在同一時間。
任何幫助將非常感謝!
謝謝!