绘制结果
在前面的练习中，您已经检查了原始数据、用数据建立了模型，并用模型进行统计推断。您发现药物 2 相比药物 1 增加了额外睡眠时间。本练习中，您将绘制结果，直观查看药物 2 增加了多少额外睡眠。
首先，使用 tidyr 包中的 pivot_wider() 函数整理数据。然后，计算每位个体的额外睡眠差值。最后，将该差值绘制为直方图。
本练习是课程的一部分
R 中的分层与混合效应模型
交互式实操练习
通过完成这段示例代码来试试这个练习。
# Load the tidyr package
library(___)
# Make the data wider
___ <-
pivot_wider(sleep,
names_from = group, values_from = extra)
# Calculate the difference
sleep_wide$___ <- sleep_wide$`2` - sleep_wide$`1`