如何根据 R 中 0.05 的显着性水平返回 at 测试的逻辑值?

要根据 R 中 0.05 的显着性水平返回 at 测试的逻辑值,我们可以按照以下步骤操作 -

  • 首先,创建一个包含一列的数据框。

  • t.test使用 ifelse应用函数以返回基于 0.05 显着性水平的逻辑值。

示例 1

创建数据框

让我们创建一个数据框,如下所示 -

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获得逻辑回报

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"

示例 2

创建数据框

让我们创建一个数据框,如下所示 -

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.test获得逻辑回报

使用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"

猜你喜欢