1、兩個變量之間存在關(guān)系，可以先提出下面的問題：關(guān)系是偶然的嗎？如何描述？關(guān)系強弱？受其他變量的影響嗎？查看子群，變量之間的關(guān)系會變化嗎？
2、
library(modelr)
mod <- lm(log(price)~log(carat),data=diamonds)
view(dfSummary(diamonds))
diamonds3 <- diamonds %>%
? add_residuals(mod) %>%
? mutate(resid=exp(resid))
ggplot(data=diamonds3)+
? geom_point(mapping=aes(x=carat,y=resid))
ggplot(data=diamonds3)+
? geom_boxplot(mapping=aes(x=cut,y=resid))+
? coord_cartesian(ylim=c(0,2))
#觀察殘差有什么用？
