Gebruik lapply met extra argumenten
In de video is de functie triple() omgezet naar multiply() om een generiekere aanpak mogelijk te maken. lapply() biedt een manier om functies te gebruiken 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 selectiefuncties die je eerder hebt geschreven: select_el(). Die neemt een vector als eerste argument en een index als tweede argument. De functie geeft het element van de vector op de opgegeven index terug.
Deze oefening maakt deel uit van de cursus
R voor gevorderden
Oefeninstructies
Gebruik lapply() twee keer om select_el() aan te roepen op alle elementen in split_low: één keer met index gelijk aan 1 en een tweede keer met de index gelijk aan 2. Sla het resultaat respectievelijk op in names en years.
Interactieve oefening met praktijkervaring
Probeer deze oefening door deze voorbeeldcode aan 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