Gebruik lapply met extra argumenten
In de video is de functie triple() omgevormd tot de functie multiply() voor een algemenere aanpak. lapply() biedt een manier om functies aan te sturen die meer dan één argument nodig hebben, zoals de functie multiply():
multiply <- function(x, factor) {
x * factor
}
lapply(list(1,2,3), multiply, factor = 3)
Rechts vind je een generieke versie van de select-functies die je eerder hebt geschreven: select_el(). Deze neemt een vector als eerste argument en een index als tweede argument. De functie retourneert het element van de vector op de opgegeven index.
Deze oefening maakt deel uit van de cursus
R voor gevorderden
Oefeninstructies
Gebruik lapply() twee keer om select_el() aan te roepen voor alle elementen in split_low: één keer met index gelijk aan 1 en een tweede keer met de index gelijk aan 2. Ken het resultaat toe aan respectievelijk names en years.
Praktische interactieve oefening
Probeer deze oefening eens door deze voorbeeldcode in te vullen.
# 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