Valores predeterminados NULL

La función cut() que usa cut_by_quantile() puede proporcionar automáticamente etiquetas adecuadas para cada categoría. El código para generar estas etiquetas es bastante complejo, así que, en lugar de aparecer directamente en la firma de la función, su argumento labels tiene como valor predeterminado NULL, y los detalles del cálculo se muestran en la página de ayuda de cut() (docs).

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 labels tenga como valor predeterminado NULL.
Elimina el argumento labels 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 labels to NULL
cut_by_quantile <- function(x, n = 5, na.rm = FALSE, 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 labels argument from the call
cut_by_quantile(
  n_visits,
  labels = c("very low", "low", "medium", "high", "very high"),
  interval_type = "(lo, hi]"
)

Editar y ejecutar código