R 中的 A/B 测试
Lauryn Burleigh
Data Scientist


忽略分组
各组分别
r 预期效应(由 cor() 得到)sig.levellibrary(pwr)
pwr.r.test(r = 0.3, power = 0.80,
sig.level = 0.05)
相关功效近似计算
(arctangh 变换)
n = 84.07364
r = 0.3
sig.level = 0.05
power = 0.8
alternative = two.sided
ggplot(pizza, aes(x = enjoyment,
y = time)) +
geom_point()

ggplot(pizza, aes(x = enjoyment,
y = time)) +
geom_point()

shapiro.test(pizza$time)
Shapiro-Wilk 正态性检验
data: pizza$time
W = 0.98686, p-value = 0.4282
shapiro.test(pizza$enjoyment)
Shapiro-Wilk 正态性检验
data: pizza$enjoyment
W = 0.98916, p-value = 0.5971
cor.test(~ time + enjoyment,
data = pizza,
method = "pearson")
方差占比:cor^2
0.30^2
[1] 0.09
皮尔逊积矩相关
data: time 和 enjoyment
t = 22.304, df = 88, p-value = 0.0218
备择假设:真实相关系数不等于 0
95% 置信区间:
0.8833166 0.9479256
样本估计:
cor
0.3021878
cor.test(~ time + enjoyment,
data = pizza,
subset =
(Topping == "Cheese"),
method = "pearson")
皮尔逊积矩相关
data: Time 和 Enjoy
t = 11.121, df = 98, p-value < 2.2e-16
备择假设:真实相关系数不等于 0
95% 置信区间:
0.6451710 0.8226595
样本估计:
cor
0.746935
忽略分组的皮尔逊:
皮尔逊积矩相关
data: time 和 enjoyment
t = 22.304, df = 88, p-value = 0.0218
备择假设:
相关系数不等于 0
95% 置信区间:
0.8833166 0.9479256
样本估计:
cor
0.3021878
library(pwr)
pwr.r.test(r = 0.302, n = 100,
sig.level = 0.022)
相关功效近似计算
(arctangh 变换)
n = 100
r = 0.302
sig.level = 0.022
power = 0.7853514
alternative = two.sided
R 中的 A/B 测试