全部版块 我的主页
论坛 计量经济学与统计论坛 五区 数据交流中心
1880 4
2018-11-10
大佬,帮帮忙呗,拜托拜托
1541825214170263.jpeg
二维码

扫码加我 拉你入群

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

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

全部回复
2018-11-10 13:00:49
getMatrix <- function(n){
  tmpMatrix <- matrix(rep(0,n*n),nrow=n)
  for( i in 1:n){
    for(j in 1:(i-1)){
      tmpMatrix[i,j] = tmpMatrix[j,i] = 0.5**(1.0/(i-j))
    }
    tmpMatrix[i,i] = 1.0
  }
  tmpMatrix
}

getMatrix(4)
二维码

扫码加我 拉你入群

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

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

2018-11-10 13:24:41
kantdisciple 发表于 2018-11-10 13:00
getMatrix
大神,我没跑出来啊
二维码

扫码加我 拉你入群

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

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

2018-11-10 13:28:36
kantdisciple 发表于 2018-11-10 13:00
getMatrix
对角线上怎么不是1是0啊
二维码

扫码加我 拉你入群

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

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

2018-11-10 13:31:36
kantdisciple 发表于 2018-11-10 13:00
getMatrix
谢大神,我会了
二维码

扫码加我 拉你入群

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

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

相关推荐
栏目导航
热门文章
推荐文章

说点什么

分享

扫码加好友,拉您进群
各岗位、行业、专业交流群