R语言验证及协方差的计算公式
我们分别用cov()函数和上述公式来进行仿真结果,代码如下:
a<-c(3,2,4,5,6) b<-c(9,7,12,15,17) COV=0 EX=mean(a) EY=mean(b) for(jin1:5){ COV<-COV+(a[j]-EX)*(b[j]-EY)/4 } COV cov(a,b)
>COV
[1]6.5
>cov(a,b)
[1]6.5
声明:本文内容来源于网络,版权归原作者所有,内容由互联网用户自发贡献自行上传,本网站不拥有所有权,未作人工编辑处理,也不承担相关法律责任。如果您发现有涉嫌版权的内容,欢迎发送邮件至:czq8825#qq.com(发邮件时,请将#更换为@)进行举报,并提供相关证据,一经查实,本站将立刻删除涉嫌侵权内容。