Word cloud के पैरामीटर बदलें
याद करें कि create_wordcloud() के दो वैकल्पिक आर्ग्युमेंट हैं: num_words, जो एक integer है और दर्शाता है कि अधिकतम कितने शब्द ड्रॉ करने हैं, और background, जो इमेज का बैकग्राउंड रंग बताता है.
इस समय Shiny ऐप हर बार बिल्कुल वही पैरामीटर के साथ word cloud आउटपुट करता है। क्योंकि word cloud जनरेट करने वाला फंक्शन ये दोनों पैरामीटर स्वीकार करता है, इन्हें इस्तेमाल न करना ठीक नहीं होगा। ये पैरामीटर Shiny इनपुट्स के जरिए यूज़र द्वारा बदले जा सकने चाहिए.
आपका काम है Shiny ऐप में दो इनपुट जोड़ना, और इन इनपुट्स के मानों को word cloud के num_words और background पैरामीटर के रूप में उपयोग करना.
यह अभ्यास पाठ्यक्रम का हिस्सा है
केस स्टडीज़: R में Shiny के साथ वेब एप्लिकेशन बनाना
अभ्यास निर्देश
सभी ज़रूरी पैकेज, जिनमें colourpicker भी शामिल है, आपके workspace में लोड कर दिए गए हैं. विशेष रूप से:
- "num" ID, 100 का डिफ़ॉल्ट मान, और 5 का न्यूनतम मान वाला एक numeric इनपुट जोड़ें.
colourpickerपैकेज से एक color इनपुट जोड़ें, जिसकी ID "col" हो, लेबल "Background color" हो, और डिफ़ॉल्ट रंग "white" हो.create_wordcloud()(लाइन 16) के पैरामीटर सेट करने के लिए इन दोनों इनपुट्स के मानों का उपयोग करें.
इंटरैक्टिव व्यावहारिक अभ्यास
इस अभ्यास को इस नमूना कोड को पूरा करके आज़माएँ।
ui <- fluidPage(
h1("Word Cloud"),
# Add a numeric input for the number of words
___(inputId = ___, label = "Maximum number of words",
value = ___, min = ___),
# Add a color input for the background color
___(___),
wordcloud2Output("cloud")
)
server <- function(input, output) {
output$cloud <- renderWordcloud2({
# Use the values from the two inputs as
# parameters to the word cloud
create_wordcloud(artofwar,
num_words = ___, background = ___)
})
}
shinyApp(ui = ui, server = server)