Użyj lapply z dodatkowymi argumentami
W materiale wideo funkcja triple() została przekształcona w funkcję multiply(), aby umożliwić bardziej ogólne podejście. Funkcja lapply() pozwala obsługiwać funkcje wymagające więcej niż jednego argumentu, takie jak multiply():
multiply <- function(x, factor) {
x * factor
}
lapply(list(1,2,3), multiply, factor = 3)
Po prawej stronie znajdziesz ogólną wersję funkcji select, którą wcześniej napisano: select_el(). Przyjmuje ona wektor jako pierwszy argument i indeks jako drugi argument. Zwraca element wektora o podanym indeksie.
To ćwiczenie jest częścią kursu
Intermediate R
Instrukcje do ćwiczenia
Użyj lapply() dwa razy, aby wywołać select_el() na wszystkich elementach split_low: raz z argumentem index równym 1 i drugi raz z indeksem równym 2. Przypisz wyniki odpowiednio do zmiennych names i years.
Interaktywne ćwiczenie praktyczne
Spróbuj tego ćwiczenia, uzupełniając ten przykładowy kod.
# Definition of split_low
pioneers <- c("GAUSS:1777", "BAYES:1702", "PASCAL:1623", "PEARSON:1857")
split <- strsplit(pioneers, split = ":")
split_low <- lapply(split, tolower)
# Generic select function
select_el <- function(x, index) {
x[index]
}
# Use lapply() twice on split_low: names and years