要根据 R 中 0.05 的显着性水平返回 at 测试的逻辑值,我们可以按照以下步骤操作 -
首先,创建一个包含一列的数据框。
t.test使用 ifelse应用函数以返回基于 0.05 显着性水平的逻辑值。
创建数据框
让我们创建一个数据框,如下所示 -
x<-rnorm(20) df1<-data.frame(x) df1
执行时,上述脚本生成以下内容output(this output will vary on your system due to randomization)-
x 1 0.44038858 2 1.08938356 3 -0.23627885 4 0.73953751 5 -0.55476732 6 0.97726848 7 0.25612436 8 -1.89827676 9 0.50333232 10 0.55482166 11 1.83279952 12 0.93609228 13 0.35048901 14 0.05136088 15 -0.89102106 16 1.06392349 17 -0.15777431 18 0.45506977 19 1.43752763 20 1.27393923
t.test与 ifelse 一起使用返回基于显着性水平 0.05 的逻辑输出,用于小于替代 -
x<-rnorm(20) df1<-data.frame(x) ifelse(t.test(df1$x,mu=10,alternative="less")[["p.value"]]<0.05,"Yes","No")
[1] "Yes"
创建数据框
让我们创建一个数据框,如下所示 -
y<-rpois(20,5) df2<-data.frame(y) df2
执行时,上述脚本生成以下内容output(this output will vary on your system due to randomization)-
y 1 5 2 5 3 5 4 3 5 8 6 3 7 5 8 8 9 7 10 6 11 2 12 7 13 3 14 4 15 5 16 6 17 11 18 9 19 4 20 6
使用t.testifelse 返回基于显着性水平 0.05 的逻辑输出,大于替代 -
y<-rpois(20,5) df2<-data.frame(y) ifelse(t.test(df2$y,mu=10,alternative="greater")[["p.value"]]<0.05,"Yes","No")
[1] "No"