为何sapply返回矩阵而非向量？R语言函数调用问题咨询

为什么sapply返回矩阵？ #

sapply的工作逻辑是遍历第一个输入向量的每个元素，把单个元素传给函数的第一个参数，而第二个参数y会完整传入函数。所以你调用sapply(x, myfunction, y)时，相当于依次执行了：

• myfunction(1, c(2,4,6,8)) → 得到c(3,5,7,9)
• myfunction(2, c(2,4,6,8)) → 得到c(4,6,8,10)
• myfunction(3, c(2,4,6,8)) → 得到c(5,7,9,11)
• myfunction(4, c(2,4,6,8)) → 得到c(6,8,10,12)

sapply会把这些结果按列拼接成矩阵，这就是你看到4×4矩阵的原因。

正确的实现方式 #

方式1：直接调用函数（最简单）

R的向量运算本身就是逐元素进行的，不需要循环或apply系列函数，直接把两个完整向量传入你的函数即可：

myfunction <- function(x,y){
  x+y
}
x = c(1,2,3,4) 
y = c(2,4,6,8)
myfunction(x,y)
# 输出：[1]  3  6  9 12

方式2：用mapply（多变量版apply）

如果一定要用apply类函数，mapply会同时遍历多个输入向量的对应元素，分别传给函数的参数：

mapply(myfunction, x, y)
# 输出：[1]  3  6  9 12

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