Kendi fonksiyonunla lapply kullan
Filip'in ders videosunda açıkladığı gibi, lapply() fonksiyonunu kendi yazdığın fonksiyonlarla da kullanabilirsin. Tek yapman gereken yeni bir fonksiyon yazıp çalışma alanında erişilebilir olmasını sağlamak. Sonrasında, bu fonksiyonu tıpkı temel R fonksiyonlarında yaptığın gibi lapply() içinde kullanabilirsin.
Önceki egzersizde, en sevdiğin öncü istatistikçiler hakkındaki bilgileri iki karakter dizisinden oluşan vektörlerin bir listesine dönüştürmek için zaten bir kez lapply() kullandın. Şimdi adları ve doğum yıllarını ayrı ayrı seçmek için biraz kod yazalım.
Örnek kodda, bir vektörü girdi olarak alıp bu vektörün ilk öğesini döndüren select_first() fonksiyonunun tanımı zaten yer alıyor.
Bu egzersiz
Orta Düzey R
kursunun bir parçasıdırEgzersiz talimatları
lapply()ileselect_first()fonksiyonunusplit_lowöğelerine uygula ve sonucunamesadlı yeni bir değişkene ata.- Ardından, girilen bir vektörün ikinci öğesi için de aynı işi yapan
select_second()fonksiyonunu yaz. - Son olarak,
select_second()fonksiyonunusplit_lowüzerinde çalıştır ve çıktıyıyearsdeğişkenine ata.
Uygulamalı interaktif egzersiz
Bu örnek kodu tamamlayarak bu egzersizi bitirin.
# Code from previous exercise:
pioneers <- c("GAUSS:1777", "BAYES:1702", "PASCAL:1623", "PEARSON:1857")
split <- strsplit(pioneers, split = ":")
split_low <- lapply(split, tolower)
# Write function select_first()
select_first <- function(x) {
x[1]
}
# Apply select_first() over split_low: names
# Write function select_second()
# Apply select_second() over split_low: years