EmpezarEmpieza gratis

¡Ya tenemos ganador!

En este ejercicio vamos a identificar una métrica importante: ¿quién es el usuario que ha publicado el tuit con más retuits?

Este tipo de información es clave cuando haces análisis de redes sociales: te indica cuál es el tuit más “famoso” de tu conjunto de datos. Esto puede ayudarte, más adelante, a definir cuáles son los temas y usuarios clave para un tema o hashtag concreto.

Usaremos purrr para extraer el tuit con más retuits de nuestro corpus y ver quién es el usuario detrás de ese tuit. Como queremos que este análisis se ejecute solo sobre tuits originales, te proporcionamos la lista non_rt, creada en un ejercicio anterior.

Este ejercicio forma parte del curso

Programación funcional intermedia con purrr

Ver curso

Instrucciones del ejercicio

  • Extrae todos los elementos "retweet_count" con la variante adecuada de map_*() y pásalos a max().

  • Rellena un map_at() con .at igual a "retweet_count" y .f siendo un mapper que compruebe la igualdad con max_rt.

  • Mapea esta nueva función sobre non_rt, conserva solo "retweet_count" y aplana el resultado.

  • Imprime en la consola el $screen_name y el $text del resultado.

ejercicio interactivo práctico

Prueba este ejercicio completando este código de ejemplo.

# Get the max() of "retweet_count" 
max_rt <- ___(non_rt, ___) %>% 
  ___()

# Prefill map_at() with a mapper testing if .x equal max_rt
max_rt_calc <- ___(___, .at = "retweet_count", .f := ~ ___ )

res <- non_rt %>%
  # Call max_rt_calc() on each element
  ___(___) %>% 
  # Keep elements where retweet_count is non-zero
  ___("___") %>% 
  # Flatten it
  ___()

# Print the "screen_name" and "text" of the result
res$screen_name
res$text
Editar y ejecutar código