Utilizar lapply con argumentos adicionales
En el vídeo, la función triple() se transformó en la función multiply() para permitir un enfoque más genérico. lapply() proporciona una forma de gestionar funciones que requieren más de un argumento, como la función multiply():
multiply <- function(x, factor) {
x * factor
}
lapply(list(1,2,3), multiply, factor = 3)
A la derecha hemos incluido una versión genérica de las funciones de selección que programaste antes: select_el(). Toma un vector como primer argumento y un índice como segundo argumento. Devuelve el elemento del vector en el índice especificado.
Este ejercicio forma parte del curso
R intermedio
Instrucciones de ejercicio
Utiliza lapply() dos veces para llamar a select_el() sobre todos los elementos de split_low: una vez con index igual a 1 y una segunda vez con el índice igual a 2. Asigna el resultado a names y years, respectivamente.
Ejercicio interactivo práctico
Pruebe este ejercicio completando este código de muestra.
# 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