Valores numéricos por defecto

cut_by_quantile() convierte un vector numérico en una variable categórica donde los cuantiles definen los puntos de corte. Es una función útil, pero ahora mismo tienes que especificar cinco argumentos para que funcione. Es demasiado pensar y teclear.

Si defines argumentos por defecto, podrás hacerla más fácil de usar. Empecemos con n, que indica en cuántas categorías se corta x.

Se proporciona un vector numérico con el número de visitas a Snake River como n_visits.

Este ejercicio forma parte del curso

Introducción a la escritura de funciones en R

Ver curso

Instrucciones del ejercicio

Actualiza la definición de cut_by_quantile() para que el argumento n tenga como valor por defecto 5.
Elimina el argumento n de la llamada a cut_by_quantile().

Ejercicio interactivo práctico

Prueba este ejercicio y completa el código de muestra.

# Set the default for n to 5
cut_by_quantile <- function(x, n, na.rm, labels, interval_type) {
  probs <- seq(0, 1, length.out = n + 1)
  qtiles <- quantile(x, probs, na.rm = na.rm, names = FALSE)
  right <- switch(interval_type, "(lo, hi]" = TRUE, "[lo, hi)" = FALSE)
  cut(x, qtiles, labels = labels, right = right, include.lowest = TRUE)
}

# Remove the n argument from the call
cut_by_quantile(
  n_visits, 
  n = 5, 
  na.rm = FALSE, 
  labels = c("very low", "low", "medium", "high", "very high"),
  interval_type = "(lo, hi]"
)

Editar y ejecutar código