临界区域
统计量（晋升率差异为 0.2917）似乎位于置换分布的极端一侧。也就是说，和观测差异一样极端的置换差异非常少。
为了量化这些极端的置换（原假设下的）差异，我们使用 quantile() 函数。
dplyr 包已为您加载。
本练习是课程的一部分
R 推断基础
练习说明
使用置换差异 disc_perm，求出 stat 的分位数，使其满足：
- 有 10% 的置换差异高于该值（0.9 分位数）
- 有 5% 的置换差异高于该值（0.95 分位数）
- 有 1% 的置换差异高于该值（0.99 分位数）
交互式实操练习
通过完成这段示例代码来试试这个练习。
disc_perm %>%
summarize(
# Find the 0.9 quantile of diff_perm's stat
q.90 = ___(___, p = ___),
# ... and the 0.95 quantile
q.95 = ___,
# ... and the 0.99 quantile
q.99 = ___
)