计算多少置信区间

Question

所以这是我在R的表。为了便利，我只做5次重复。

  V1         V2         V3         V4         V5
1 -1.4136084 -1.6883369 -0.9209277 -1.5650176 -1.4695545
2 0.2414484 -0.2508248 -0.1921887 0.1516668 0.3347349

我如何计算值0在这些其他值之间的时间？信心[1]＆lt; 0＆lt;置信度[2]

这是我目前的代码......

> x = 0
> confidences <- replicate(5,t.test(rnorm(n = 10, mean = -0.5, sd = 1))$conf)
> for(i in ncol(confidences)){if(confidences[1] < 0 & 0 < confidences[2]){x+1}}

Answer 1

sum(confidences[1,]<0 & confidences[2,]>0)