Utilizar vapply (2)

Hasta ahora has visto que vapply() imita el comportamiento de sapply() si todo va según lo previsto. Pero ¿y si no es así?

En el vídeo, Filip te mostró que hay casos en los que la estructura de la salida de la función que quieres aplicar, FUN, no se corresponde con la plantilla que especificas en FUN.VALUE. En ese caso, vapply() mostrará un error que te informará del desajuste entre la salida esperada y la real.

Este ejercicio forma parte del curso

R intermedio

Ver curso

Instrucciones de ejercicio

  • Inspecciona el código precargado e intenta ejecutarlo. Si no has cambiado nada, debería aparecer un error. Esto se debe a que vapply() sigue esperando que basics() devuelva un vector de longitud 3. El mensaje de error te da una indicación de lo que va mal.
  • Intenta corregir el error editando el comando vapply().

Ejercicio interactivo práctico

Pruebe este ejercicio completando este código de muestra.

# temp is already available in the workspace

# Definition of the basics() function
basics <- function(x) {
  c(min = min(x), mean = mean(x), median = median(x), max = max(x))
}

# Fix the error:
vapply(temp, basics, numeric(3))