r - 我想绘制测试的大小(例如 t test )与样本大小。如何在 R 中做到这一点?
问题描述
我有x<-rnorm (a,0,1)
并且y <- rnorm( a,0,1)
a 代表样本大小我将使用不同的样本大小,例如(20、30、40、50),然后计算测试的大小(t 测试或任何其他测试),然后将其与样本大小进行对比。
plot (a,size of the test)
解决方案
这听起来像是我和学生一起做的一个练习,向他们展示自由度对关键 T 值的影响。
首先,我不会为每个样本量做一次,但至少 100-1000 次。然后,存储所有结果并绘制密度图以可视化 T 值。也许还包括条形图以显示 5% 变得显着,与样本量无关,因为 R 校正了自由度:
ssizes = c(5,10,20,30,50,100,200)
cols = rainbow(7)
t.list = list()
p.list = list()
n = 1000
for(s in ssizes){
t = c()
sig = 0
for(i in 1:n){
x = rnorm(s,0,1)
y = rnorm(s,0,1)
test = t.test(x,y)
t[i] = test$statistic ## Store the t-value
if(test$p.value<0.05){sig=sig+1}
}
t.list[[as.character(s)]]=t
p.list[[as.character(s)]]=sig
}
plot(0,0,pch="",main="Density Plots",xlim=c(-4,4),ylim=c(0,0.5),
xlab="T-Value")
for(i in 1:length(ssizes)){
lines(density(t.list[[i]]),col=cols[i])
}
legend("topleft",as.character(ssizes),lwd=1,col=cols)
barplot(unlist(p.list),main=paste("Number of tests with p<.05 out of ",n,"tests"),
xlab="Sample Size")
推荐阅读
- html - 在小屏幕上分成两行
- java - 从 NetBeans 内部运行 RapidMiner 进程
- c# - 在 xamarin 表单 iOS 应用程序中使用 Acr.UserDialogs 的进度对话框出现问题
- django - Django SAML 集成
- c# - 如何使用 iTextSharp 将 TIFF 字节数组转换为 PDF 字节数组?
- kendo-ui - 如何在 Kendo AutoComple 中使用通配符查找项目
- wpf - 如何在 WPF 中的 Metro 窗口底部创建菜单
- node.js - 每日或每月间隔的交易总额
- python - 如何使用元组键操作字典以输出熊猫数据框
- gerrit - Gerrit 到 Gerrit 复制无法查看参考/更改