Valeurs par défaut NULL

La fonction cut() utilisée par cut_by_quantile() peut automatiquement fournir des étiquettes pertinentes pour chaque catégorie. Le code qui génère ces étiquettes est assez complexe. Plutôt que d’apparaître directement dans la signature de la fonction, son argument labels a donc pour valeur par défaut NULL, et les détails du calcul figurent sur la page d’aide de cut() (docs).

Cet exercice fait partie du cours

<cours>Introduction à l’écriture de fonctions en R</cours>

Voir le cours

Instructions de l’exercice

Mettez à jour la définition de cut_by_quantile() pour que l’argument labels ait pour valeur par défaut NULL.
Supprimez l’argument labels de l’appel à cut_by_quantile().

Exercice interactif pratique

Essayez cet exercice en complétant ce code d’exemple.

# 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]"
)

Modifier et exécuter le code