效度的代码

是 否 +2 论坛币

k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群

赵安豆老师微信：zhaoandou666

经管之家联合CDA

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

立即领取

感谢您参与论坛问题回答

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

+2 论坛币

c=dim(controldata1)[2]
r=dim(controldata1)[1]
for(i in 1:r){
controldata1[i,c+1]<-sum(controldata1[i,1:c])
}
var=c(0)
for(i in 1:c+1){
(var[i]<-var(controldata1[,i]))
}
a<-(c/(c-1))*(1-sum(var[1:c])/var[c+1])

扫码加我 拉你入群

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

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

分享0 收藏0 回帖

关键词：control Contro contr rold Data