求一个矩阵的最大值？我的这个不对，哪里出错了？？谢谢

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

f1<-function(a)
{
   for(i in 1:nrow(a))
   {
     for(j in 1:ncol(a))
      {

       max=a[1,1]
     if(a[i,j]>max)
     max<-a[i,j]

     }
   }

print(max)
}

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：哪里出错了 最大值 max function 最大值

千帆过尽后 发表于 2015-6-5 23:36
f1max)
     max

直接用max(a)就行了

max=a[1,1]
放到两个for循环外面。

r永远要尽量避免用循环语句

亚米UM 发表于 2015-6-6 00:06
直接用max(a)就行了

有时候会报错，计算结果为NaN，不知道为何？