詞雲 Shiny 應用程式

已提供名為 artofwar 的範例資料集，內容為《孫子兵法》全書的文字。你可以執行 head(artofwar) 或 tail(artofwar) 來檢視書中開頭與結尾的幾段文字。

就像影片中提到的，詞雲不是你先前見過的輸出，因此需要一組新的輸出與渲染函式：wordcloud2Output() 與 renderWordcloud2()。這些輸出相關的函式來自 wordcloud2 套件。

本練習屬於課程

案例研究：使用 R 的 Shiny 建置網頁應用程式

檢視課程

練習說明

create_wordcloud() 函式、artofwar 資料集，以及所有必要的套件都已在你的工作空間中。

在 UI 中加入詞雲輸出的預留位置，outputId 設為 cloud。
將詞雲物件渲染出來，並指派到 output 清單中正確的項目（第 11 行）。

另外，create_wordcloud() 是我們替你定義的函式。你無法在自己電腦上的 RStudio 執行它。若想查看其內容，請在主控台輸入 create_wordcloud。

動手互動練習

試著完成這個範例程式碼，體驗一下這個練習。

# Define UI for the application
ui <- fluidPage(
  h1("Word Cloud"),
  # Add the word cloud output placeholder to the UI
  ___(outputId = "cloud")
)

# Define the server logic
server <- function(input, output) {
  # Render the word cloud and assign it to the output list
  output$___ <- ___({
    # Create a word cloud object
    create_wordcloud(artofwar)
  })
}

# Run the application
shinyApp(ui = ui, server = server)

編輯並執行程式碼