练习

• 1. 在 lcarat 与 lprice 的图中，有一些明亮的垂直条带。它们代表什么？
• 2. 如果 log(price) = a_0 + a_1 * log(carat)，这说明 price 和 carat 之间是什么关系？
• 3. 提取出残差非常高和非常低的钻石。这些钻石有什么不寻常之处吗？它们是特别好还是特别差，还是你认为这些是定价错误？
• 4. 最终模型 mod_diamonds2 在预测钻石价格方面表现好吗？如果你要购买钻石，你会相信它告诉你的花费金额吗？

什么影响了每日航班数量？

让我们对一个乍看之下更简单的数据集进行类似的分析：每天从纽约起飞的航班数量。这是一个非常小的数据集——只有 365 行和 2 列——我们最终不会得到一个完全成熟的模型，但正如你将看到的，过程中的每一步都会帮助我们更好地理解数据。让我们先统计每天的航班数量，并用 ggplot2 将其可视化：

daily <- flights %>% mutate(date = make_date(year, month, day)) %>% group_by(date) %>% summarize(n = n()) daily #> # A tibble: 365 × 2 #> date n #> #> 1 2013-01-01 842 #> 2 2013-01-02 943 #> 3 2013-01-03 914 #> 4 2013-01-04 915 #> 5 2013-01-05 720 #> 6 2013-01-06 832 #> # ... with 359 more rows ggplot(daily, aes(date, n)) + geom_line()