2017-04-12 115 views
0

我现在正在介绍统计类,并且完全不知道发生了什么。我如何使用R解决以下问题?使用R计算样本均值的概率

设x是一个连续的随机变量,它具有均值为71,标准差为15的正态分布。假设n/N小于或等于0.05,找出样本均值x-酒吧,从这个人口中抽取的24个随机样本将在68.1和78.3之间,

我真的很努力在这一个,我仍然必须通过相同格式的其他问题。任何帮助将不胜感激!

+0

我根本不是统计学家,但最近有一个类似的统计类。我认为你正在寻找置信区间 – engineercoding

+0

欢迎来到SO!请阅读[问]和[mcve] ...然后编辑您的问题:http://stackoverflow.com/posts/43364072/edit并请阅读http://stackoverflow.com/help/dont-ask – jogo

+1

尝试发布您的问题在http://stats.stackexchange.com/代替 –

回答

0

在代码方面:

pop_sample <- rnorm(24, 71, 15) 
se_pop <- sd(pop_sample)/sqrt(24) 
pnorm(78.3, 71, se_pop) - pnorm(68.1, 71, se_pop) # 80% 

在统计的术语......你或许应该参考stats.stackexchange.com或你的教授。

0

当R编码,这可能为您设置:

[# Children's IQ scores are normally distributed with a 
# mean of 100 and a standard deviation of 15. What 
# proportion of children are expected to have an IQ between 
# 80 and 120? 

mean=100; sd=15 
lb=80; ub=120 

x <- seq(-4,4,length=100)*sd + mean 
hx <- dnorm(x,mean,sd) 

plot(x, hx, type="n", xlab="IQ Values", ylab="", 
    main="Normal Distribution", axes=FALSE) 

i <- x >= lb & x <= ub 
lines(x, hx) 
polygon(c(lb,x\[i\],ub), c(0,hx\[i\],0), col="red") 

area <- pnorm(ub, mean, sd) - pnorm(lb, mean, sd) 
result <- paste("P(",lb,"< IQ <",ub,") =", 
    signif(area, digits=3)) 
mtext(result,3) 
axis(1, at=seq(40, 160, 20), pos=0)] 

Example data plotted

也有一些不错的入门课程由datacamp R和数据分析,这也可能会派上用场: https://www.datacamp.com/courses/exploratory-data-analysis

另有关于R和统计学的教程: http://www.cyclismo.org/tutorial/R/confidence.html