R语⾔验证及协⽅差的计算公式
协⽅差的计算公式及R语⾔进⾏验证
⾸先附上协⽅差公式:
来设5个样本点:(3,9),(2,7),(4,12),(5,15),(6,17)
⽤R绘制出散点图,⼤概是这样:
要求这5个点的协⽅差,⾸先样本点为5个,n=5,X依次取3,2,4,5,6,Y依次取9,7,12,15,17。X的均值为4,带⼊公式可得:
不难计算出结果为6.5
现在⽤R语⾔进⾏验证:
已知R语⾔⾥边协⽅差函数为cov(x,y)
我们分别⽤cov()函数和上述公式来进⾏仿真结果,代码如下:
a <- c(3,2,4,5,6)
b <- c(9,7,12,15,17)
COV=0
EX=mean(a)
EY=mean(b)
for(j in 1:5){
COV <- COV+(a[j]-EX)*(b[j]-EY)/4
正则化协方差}
COV
cov(a,b)
输出结果如下:
> COV
[1] 6.5
> cov(a,b)
[1] 6.5
由此可得,计算公式得出的结果完全正确
到此这篇关于R语⾔验证及协⽅差的计算公式的⽂章就介绍到这了,更多相关R语⾔协⽅差计算内容请搜索以前的⽂章或继续浏览下⾯的相关⽂章希望⼤家以后多多⽀持!

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。