[程式] R: 改寫程式 不使用for loop已刪文

看板Statistics作者 (smellyheadN  )時間4年前 (2021/04/06 07:06), 編輯推噓0(003)
留言3則, 2人參與, 4年前最新討論串1/2 (看更多)
[R code] X<-matrix(rnorm(300),3,100) alpha <- matrix(c(3,2,1,2,2,1,1,1,1),3,3) for(i in 1:3){ for(j in i:3){ alpha[i,j] <- alpha[j,i] <- var(X[i,],X[j,]) } } 請問一下 上面程式 要如何改寫成不用for loop 謝謝!! -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 100.36.131.156 (美國) ※ 文章網址: https://www.ptt.cc/bbs/Statistics/M.1617663970.A.9B4.html

04/06 09:50, 4年前 , 1F
改成一層apply https://ideone.com/zT9qTP
04/06 09:50, 1F

04/06 10:03, 4年前 , 2F
加入對角與非對角分別處理,應該會更快
04/06 10:03, 2F

04/06 10:17, 4年前 , 3F
感謝!!!
04/06 10:17, 3F
文章代碼(AID): #1WQvVYcq (Statistics)
文章代碼(AID): #1WQvVYcq (Statistics)