Cambia los parámetros de la nube de palabras
Recuerda que create_wordcloud() tiene dos argumentos opcionales: num_words, que es un entero que indica el número máximo de palabras a dibujar, y background, que especifica el color de fondo de la imagen.
Ahora mismo, la app de Shiny simplemente muestra una nube de palabras siempre con los mismos parámetros. Como la función que genera la nube acepta estos dos parámetros, sería una pena no usarlos. El usuario debería poder ajustarlos mediante inputs de Shiny.
Tu tarea es añadir dos inputs a la app de Shiny y usar sus valores como los parámetros num_words y background de la nube de palabras.
Este ejercicio forma parte del curso
Casos prácticos: crea aplicaciones web con Shiny en R
Instrucciones del ejercicio
Todos los paquetes necesarios, incluido colourpicker, ya se han cargado en tu espacio de trabajo. En concreto:
- Añade un input numérico con ID "num", valor por defecto 100 y valor mínimo 5.
- Añade un input de color (del paquete
colourpicker) con ID "col", etiqueta "Background color" y color por defecto "white". - Utiliza los valores de estos dos inputs para establecer los parámetros de
create_wordcloud()(línea 16).
Ejercicio interactivo práctico
Prueba este ejercicio y completa el código de muestra.
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)