如何繪制圖形以檢查重要預測變量以何種方式影響我的結果變量？

Question

如何創建視覺效果來查看一天中的時間如何影響道德水平？ 一天中的時間是1/2變量，道德是通過量表衡量的。

Reg2<-lm(Morality~TimeofDay,data=Data316b)
summary(Reg2)

Call:
lm(formula = Morality ~ TimeofDay, data = Data316b)

Residuals:
     Min       1Q   Median       3Q      Max 
-1.43214 -0.48304 -0.06607  0.47589  1.21786 

Coefficients:
            Estimate Std. Error t value Pr(>|t|)    
(Intercept)   3.5500     0.1915  18.539   <2e-16 ***
TimeofDay     0.4821     0.1915   2.107   0.0418 *

Signif. codes:  0 ‘***' 0.001* * 0.01'*' 0.05 ‘.’ 0.1 ‘ ’ 1

Residual standard error: 0.6633 on 38 degrees of freedom
  (3 observations deleted due to missingness)
Multiple R-squared:  0.1046,    Adjusted R-squared:  0.081 
F-statistic: 4.438 on 1 and 38 DF,  p-value: 0.04181

Answer 1

我想你要

plot(Morality~TimeofDay,data=Data316b)
Reg2 <- lm(Morality~TimeofDay,data=Data316b) summary(Reg2)
abline(Reg2)

要么：

library("ggplot2")
ggplot(Data316b,aes(TimeofDay,Morality))+
   geom_point() + geom_smooth(method="lm")

PS：您是否真的根據一天中的時間來衡量道德[原文如此]，還是死亡率正在改變？