Sayısal varsayılanlar
cut_by_quantile() sayısal bir vektörü, kesme noktalarını çeyrekler (quantile) belirleyecek şekilde kategorik bir değişkene dönüştürür. Bu işlev kullanışlıdır ama şu anda çalışması için beş argüman belirtmen gerekiyor. Bu kadar düşünmek ve yazmak fazla.
Varsayılan argümanlar belirleyerek kullanımı kolaylaştırabilirsin. x'i kaç kategoriye böleceğini belirleyen n ile başlayalım.
Snake River’a yapılan ziyaret sayılarından oluşan sayısal bir vektör n_visits olarak sağlanmıştır.
Bu egzersiz, kursun bir parçasıdır
R'de Fonksiyon Yazmaya Giriş
Egzersiz talimatları
cut_by_quantile()tanımını güncelle venargümanının varsayılanını5yap.cut_by_quantile()çağrısındannargümanını kaldır.
Uygulamalı etkileşimli egzersiz
Bu egzersizi bu örnek kodu tamamlayarak deneyin.
# 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]"
)