r - 如何更改 R shiny 中 wordcloud 的大小以不剪切图像？

Question

我怎样才能改变 R 中 wordcloud 的大小以不切割图像？

我使用了 png() 函数，但我没有得到结果:

output$plot2 <- renderPlot({

    terms2 <- reactive({
      # Change when the "update" button is pressed...
      input$update

      data2 <- input$texto1

      # ...but not for anything else
      isolate({
        withProgress({
          setProgress(message = "Processing corpus...")
          getTermMatrix2(data2)

        })
      })
    })

    v2 <- terms2()

    wordcloud_rep2(names(v2), v2, scale=c(4,0.5),
                  min.freq = 1, max.words=20,
                  colors=brewer.pal(8, "Dark2"))
  })

Answer 1

使用wordcloud2代替wordcloud。
它的基本需求是两列词和频率来呈现词云，它也有自己的 renderoutput 和 Shiny 的 renderwordcloud。
我附上了例子看看。

this is how your data should look like:

   words   freq
   oil     85
   said    73
   prices  48

wordcloud2 link

   library(wordcloud2)
   library(shiny)
   library(shinydashboard)

 ui <- dashboardPage(
       dashboardHeader(),
         dashboardSidebar(),
           dashboardBody(
               wordcloud2Output('cloud')
            )
          ) 

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

  shinyApp(ui, server)