R語(yǔ)言驗(yàn)證及協(xié)方差的計(jì)算公式
協(xié)方差的計(jì)算公式及R語(yǔ)言進(jìn)行驗(yàn)證
首先附上協(xié)方差公式:

來(lái)設(shè)5個(gè)樣本點(diǎn):(3,9),(2,7),(4,12),(5,15),(6,17)
用R繪制出散點(diǎn)圖,大概是這樣:

要求這5個(gè)點(diǎn)的協(xié)方差,首先樣本點(diǎn)為5個(gè),n=5,X依次取3,2,4,5,6,Y依次取9,7,12,15,17。X的均值為4,帶入公式可得:

不難計(jì)算出結(jié)果為6.5
現(xiàn)在用R語(yǔ)言進(jìn)行驗(yàn)證:
已知R語(yǔ)言里邊協(xié)方差函數(shù)為cov(x,y)
我們分別用cov()函數(shù)和上述公式來(lái)進(jìn)行仿真結(jié)果,代碼如下:
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)
輸出結(jié)果如下:
> COV
[1] 6.5
> cov(a,b)
[1] 6.5
由此可得,計(jì)算公式得出的結(jié)果完全正確
到此這篇關(guān)于R語(yǔ)言驗(yàn)證及協(xié)方差的計(jì)算公式的文章就介紹到這了,更多相關(guān)R語(yǔ)言協(xié)方差計(jì)算內(nèi)容請(qǐng)搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持腳本之家!
相關(guān)文章
R語(yǔ)言中data.frame的常用操作總結(jié)
這篇文章主要介紹了R語(yǔ)言中data.frame的常用操作總結(jié),具有很好的參考價(jià)值,希望對(duì)大家有所幫助。一起跟隨小編過來(lái)看看吧2021-04-04
R語(yǔ)言 title()函數(shù)的參數(shù)用法說(shuō)明
這篇文章主要介紹了R語(yǔ)言 title()函數(shù)的參數(shù)用法說(shuō)明,具有很好的參考價(jià)值,希望對(duì)大家有所幫助。一起跟隨小編過來(lái)看看吧2021-04-04
R語(yǔ)言入門使用RStudio制作包含Rcpp代碼的R包
這篇文章主要為大家介紹了R語(yǔ)言入門使用RStudio來(lái)制作包含Rcpp代碼的R包,有需要的朋友可以借鑒參考下,希望能夠有所幫助,祝大家多多進(jìn)步2021-11-11
R語(yǔ)言利用loess如何去除某個(gè)變量對(duì)數(shù)據(jù)的影響詳解
這篇文章主要給大家介紹了關(guān)于R語(yǔ)言利用loess去除某個(gè)變量對(duì)數(shù)據(jù)的影響的相關(guān)資料,文中通過示例代碼介紹的非常詳細(xì),對(duì)大家學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,需要的朋友們下面隨著小編來(lái)一起學(xué)習(xí)學(xué)習(xí)吧。2017-11-11
R語(yǔ)言模擬疫情傳播圖RVirusBroadcast展示疫情數(shù)據(jù)
本文用RVirusBroadcast展示模擬的疫情數(shù)據(jù),讓R語(yǔ)言模擬疫情傳播圖來(lái)告訴你為什么還不到出門的時(shí)候,有需要的朋友可以借鑒參考下,希望能夠有所幫助2022-02-02
R語(yǔ)言-實(shí)現(xiàn)list的嵌套與提取嵌套中的值
這篇文章主要介紹了R語(yǔ)言-實(shí)現(xiàn)list的嵌套與提取嵌套中的值,具有很好的參考價(jià)值,希望對(duì)大家有所幫助。一起跟隨小編過來(lái)看看吧2021-04-04
R語(yǔ)言數(shù)據(jù)重塑知識(shí)點(diǎn)總結(jié)
在本篇文章里小編給大家整理的是一篇關(guān)于R語(yǔ)言數(shù)據(jù)重塑的相關(guān)知識(shí)點(diǎn)內(nèi)容,有興趣的朋友們可以跟著學(xué)習(xí)下。2021-03-03
R語(yǔ)言對(duì)Web數(shù)據(jù)操作實(shí)例
在本篇文章里小編給大家整理的是一篇關(guān)于R語(yǔ)言對(duì)Web數(shù)據(jù)操作實(shí)例內(nèi)容,有興趣的朋友們可以學(xué)習(xí)下。2021-05-05

