在 lapply 中使用附加参数
在视频中，triple() 函数被改写为 multiply() 函数，以便采用更通用的方法。lapply() 提供了一种方式来处理需要多个参数的函数，例如 multiply() 函数：
multiply <- function(x, factor) {
x * factor
}
lapply(list(1,2,3), multiply, factor = 3)
在右侧，我们提供了一个您之前编写过的选择函数的通用版本：select_el()。它将向量作为第一个参数，将索引作为第二个参数。它会返回该向量在指定索引处的元素。
本练习是课程的一部分
R 中级
练习说明
请使用 lapply() 两次，将 select_el() 作用于 split_low 的所有元素：第一次将 index 设为 1，第二次将 index 设为 2。分别将结果赋值给 names 和 years。
交互式实操练习
通过完成这段示例代码来试试这个练习。
# 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