Valeurs numériques par défaut

cut_by_quantile() transforme un vecteur numérique en variable catégorielle où les quantiles définissent les points de coupure. C’est une fonction utile, mais pour l’instant vous devez spécifier cinq arguments pour la faire fonctionner. Cela fait trop réfléchir et taper.

En définissant des arguments par défaut, vous pouvez la rendre plus simple à utiliser. Commençons par n, qui indique en combien de catégories découper x.

Un vecteur numérique du nombre de visites à Snake River est fourni sous le nom n_visits.

Cet exercice fait partie du cours

Introduction à l’écriture de fonctions en R

Afficher le cours

Instructions

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

Exercice interactif pratique

Essayez cet exercice en complétant cet exemple de code.

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

Modifier et exécuter le code