Question

假设以下数据符合正态分布曲线：

345.35 346.25 351.65 341.75 347.00 288.95 342.50 330.35 326.85 341.25
329.55 327.85 329.00 363.50 341.25 329.90 324.50 338.90 331.60 
333.80
343.45 352.35 351.95 289.90 331.75 336.75 341.65 356.75 330.95 
360.25
297.25 348.95 324.50 338.90 331.60 333.80

我想通过建立误差幅度和置信区间来估算均值，使用95％的置信水平。

我知道如何手动执行此操作但是任何人都可以帮我处理r代码吗？

我已经在r中找到了以下统计信息。

`mean(AC);`
## [1] 335.625
`var(AC);`
## [1] 278.8489
`sd(AC);`
## [1] 16.69877

感谢有经验的人帮我解决这个问题！

Answer 1

> x <- c(345.35,346.25,351.65,341.75,347.00,288.95,342.50,330.35,326.85,341.25,
+ 329.55,327.85,329.00,363.50,341.25,329.90,324.50,338.90,331.60 ,
+ 333.80,343.45 ,352.35, 351.95, 289.90 ,331.75, 336.75 ,341.65, 356.75 ,330.95 ,
+ 360.25,
+ 297.25, 348.95 ,324.50 ,338.90, 331.60 ,333.80)
> n <- length(x)
> s <- sd(x)
> s
[1] 16.69877
> mu <- mean(x)
> mu
[1] 335.625
> error <- qnorm(0.975)*s/sqrt(n)
> mu-error
[1] 330.1702
> mu+error
[1] 341.0798

误差范围和C.I.

1 个答案: