矩阵如何作为函数的参数？

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

立即领取

感谢您参与论坛问题回答

经管之家送您两个论坛币！

+2 论坛币

使用 R 编写函数，请问如何将一个列数已知的矩阵作为函数参数，并在函数体中对列进行操作？譬如，怎么让下面的代码通过？

g = function(tet,x){
   m1 = x[,1]*((x[,3]-x[,2])-tet*(x[,2]-x[,1]))
   m2 = x[,1]*((x[,4]-x[,3])-tet*(x[,3]-x[,2]))
   m3 = x[,2]*((x[,4]-x[,3])-tet*(x[,3]-x[,2]))
   f = cbind(m1,m2,m3)
   return(f)
}

扫码加我 拉你入群

请注明：姓名-公司-职位

以便审核进群资格，未注明则拒绝

分享0 收藏0 回帖

关键词：function RETURN bind turn RET 如何

直接用就可以了

1. > tet <- 2
   
2. > x <- matrix(1:12, ncol = 4)
   
3. > g(tet, x)
   
4.      m1 m2  m3
   
5. [1,] -3 -3 -12
   
6. [2,] -6 -6 -15
   
7. [3,] -9 -9 -18

复制代码

qoiqpwqr 发表于 2015-1-4 22:06
直接用就可以了

谢谢.

这是给函数的参数事先赋了初值。定义该函数后，后面可重新给参数赋值并调用该函数吗？

qoiqpwqr 发表于 2015-1-4 22:06
直接用就可以了

谢谢.

这是给函数的参数事先赋了初值。定义该函数后，后面可重新给参数赋值并调用该函数吗？

Richard_Zj 发表于 2015-1-4 22:14
谢谢.

这是给函数的参数事先赋了初值。定义该函数后，后面可重新给参数赋值并调用该函数吗？

只要你的矩阵，x, 至少有4列，就可以反复调用该函数。