Warning: file_get_contents(/data/phpspider/zhask/data//catemap/4/r/69.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
如何计算两个值的差值,包括它们在R中的标准偏差?_R_Statistics_Difference - Fatal编程技术网

如何计算两个值的差值,包括它们在R中的标准偏差?

如何计算两个值的差值,包括它们在R中的标准偏差?,r,statistics,difference,R,Statistics,Difference,我有以下价值观: x <- c(20.00740, 38.108416, 56.832884) #x0 of peaks sx <- c(0.1435, 0.011667, 0.027201) # std. error of x0 x对于随机变量x和Y,使用E(x-Y)=EX-EY,sd(x)=sqrt(var(x))和var(x-Y)=var(x)+var(Y)这一事实。最后一个等式假设X和Y不相关 现在,如果我们标记峰值A、B、C,则存在差异A-B、A-C和B-C,即3个差

我有以下价值观:

x <- c(20.00740, 38.108416, 56.832884)  #x0 of peaks
sx <- c(0.1435, 0.011667, 0.027201)  # std. error of x0

x对于随机变量x和Y,使用E(x-Y)=EX-EY,sd(x)=sqrt(var(x))和var(x-Y)=var(x)+var(Y)这一事实。最后一个等式假设X和Y不相关

现在,如果我们标记峰值A、B、C,则存在差异A-B、A-C和B-C,即3个差异值,而不是2个(如果区分A-B和B-A等,则存在6个差异)。它们在下面的
xx
ss
矩阵的上(或下)三角形中计算
xx[upper.tri(xx)]
ss[upper.tri(xx)]
将提取上三角值

xx <- outer(x, x, "-"); xx
##          [,1]      [,2]      [,3]
## [1,]  0.00000 -18.10102 -36.82548
## [2,] 18.10102   0.00000 -18.72447
## [3,] 36.82548  18.72447   0.00000

ss <- sqrt(outer(sx^2, sx^2, "+")) * !diag(length(sx)); ss
##           [,1]       [,2]       [,3]
## [1,] 0.0000000 0.14397350 0.14605528
## [2,] 0.1439735 0.00000000 0.02959752
## [3,] 0.1460553 0.02959752 0.00000000

xx谢谢,这很有帮助!