Значення за замовчуванням NULL

Функція cut(), яку використовує cut_by_quantile(), може автоматично створювати доречні підписи для кожної категорії. Код для генерації цих підписів доволі складний, тож замість того, щоб наводити його безпосередньо в сигнатурі функції, аргумент labels за замовчуванням має значення NULL, а деталі обчислень описані на сторінці довідки cut() (docs).

Ця вправа є частиною курсу

Вступ до написання функцій в R

Переглянути курс

Інструкції до вправи

Оновіть визначення cut_by_quantile() так, щоб аргумент labels за замовчуванням мав значення NULL.
Приберіть аргумент labels з виклику cut_by_quantile().

Інтерактивна практична вправа

Спробуйте виконати цю вправу, доповнивши цей зразок коду.

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

Редагувати та запускати код