R 两个单词cloud2在同一个闪亮的页面上

R 两个单词cloud2在同一个闪亮的页面上,r,shiny,wordcloud2,R,Shiny,Wordcloud2,我试着在我闪亮的黑板上放两个单词Cloud2,但第二个没有显示出来 当我检查页面时,它们都在正文中 我的剧本 library(wordcloud2) library(shinydashboardd) # Global variables can go here n <- 1 # Define the UI ui <- dashboardPage( box(wordcloud2Output('wordcloud2')), box(wordcloud2Output('wo

我试着在我闪亮的黑板上放两个单词Cloud2,但第二个没有显示出来

当我检查页面时,它们都在正文中

我的剧本

library(wordcloud2)
library(shinydashboardd)
# Global variables can go here
n <- 1

# Define the UI
ui <- dashboardPage(
   box(wordcloud2Output('wordcloud2')),
   box(wordcloud2Output('wordcloud3'))
)


# Define the server code
server <- function(input, output) {
  output$wordcloud2 <- renderWordcloud2({
    wordcloud2(demoFreq)
  })

  output$wordcloud3 <- renderWordcloud2({
    wordcloud2(demoFreq)
  })

}
shinyApp(ui = ui, server = server)
库(wordcloud2)
图书馆(Shinydashboard)
#全局变量可以放在这里

我在这方面没有遇到任何问题。我无法运行您的代码,因为它有一些错误(您编写了
shinydashboard
而不是
shinydashboard
,并且您的UI没有运行,因为
dashboardPage()
函数不能将两个框作为参数),但是如果我只是修复这些错误,它就可以正常工作:

library(wordcloud2)
library(shiny)

ui <- fluidPage(
        wordcloud2Output('wordcloud2'),
        wordcloud2Output('wordcloud3')
)

server <- function(input, output) {
        output$wordcloud2 <- renderWordcloud2({
                wordcloud2(demoFreq)
        })

        output$wordcloud3 <- renderWordcloud2({
                wordcloud2(demoFreq)
        })
}

shinyApp(ui = ui, server = server)
库(wordcloud2)
图书馆(闪亮)

ui thx对于你的答案,我尝试了你的代码,这是相同的问题,只是第一个wordcloud正在显示。我唯一能想到的是尝试更新所有包的最后一个版本,我添加html页面输出,2个wordcloud在里面。在这种情况下,你可以向wordcloud包作者报告问题,并向他们显示此代码。包括有关您的环境的任何信息
library(wordcloud2)
library(shiny)

ui <- fluidPage(
        wordcloud2Output('wordcloud2'),
        wordcloud2Output('wordcloud3')
)

server <- function(input, output) {
        output$wordcloud2 <- renderWordcloud2({
                wordcloud2(demoFreq)
        })

        output$wordcloud3 <- renderWordcloud2({
                wordcloud2(demoFreq)
        })
}

shinyApp(ui = ui, server = server)