R语言中作为sapply()与lapply()参数的'['精确含义是什么？

首先得明确一个很多新手容易忽略的点：在R里，方括号[本质上是一个函数。你可以直接调用它，比如'['(c(1,2,3), 2)就会返回2，和c(1,2,3)[2]的效果完全一样。

当把'['传递给lapply()、sapply()这类函数时，其实就是把这个“元素提取函数”作为参数传入，让apply系列函数对每个迭代的子对象执行“提取指定位置元素”的操作。后面跟着的数字（比如2、1）就是'['函数的额外参数——也就是你要提取的索引位置。

针对你提供的代码片段的具体解析 #

先看整体代码的作用：它是把数据框dd中C列的结构化字符串（比如"X1=7;X2=8;X3=9"）拆分成命名向量，然后提取所有出现过的唯一变量名。我们一步步拆解其中的'['用法：

1. namev函数里的sapply(a,'[',2)和sapply(a,'[',1) #

• 首先，strsplit(x,"=")会把输入的字符串（比如"X1=7"）按=分割成一个列表，结果是list(c("X1", "7"))，赋值给a。
• sapply(a,'[',2)：这里sapply会遍历a中的每个元素（也就是每个分割后的字符向量），调用'['函数，传入的第二个参数是2——意思是取每个向量的第2个元素。对应上面的例子，就是提取出"7"。
• 同理，sapply(a,'[',1)是取每个分割后向量的第1个元素，也就是提取出"X1"。
• 最后setNames(...)把提取到的数值（第2个元素）用变量名（第1个元素）命名，得到一个命名向量，比如X1=7。

2. lapply(strsplit(as.character(dd$C),";"), namev) #

• strsplit(as.character(dd$C),";")会把dd$C里的每个字符串按;分割，比如第一个字符串变成c("X1=7", "X2=8", "X3=9")，这是一个包含3个元素的列表（对应dd的3行）。
• lapply对这个列表里的每个元素（也就是每一组"Xn=value"的向量）调用namev函数，最终得到vv——一个包含3个命名向量的列表，每个向量对应dd一行中C列拆分后的变量和值。

3. sapply(vv, names) #

• 这里sapply遍历vv中的每个命名向量，调用names函数提取它们的变量名，然后返回一个矩阵（因为sapply默认简化结果），再通过unlist把它转成向量，最后unique得到所有出现过的唯一变量名（也就是X1、X2、X3）。

内容的提问来源于stack exchange，提问作者BigAl_LBL