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
Introduction à l’écriture de fonctions en R
Instructions
- Mettez à jour la définition de
cut_by_quantile()pour que l’argumentlabelsait pour valeur par défautNULL. - Supprimez l’argument
labelsde l’appel àcut_by_quantile().
Exercice interactif pratique
Essayez cet exercice en complétant cet exemple de code.
# 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]"
)