I am not sure how to get to my x,y (a,b) for my test.



> SLR.model <-lm(Y ~ X)
> summary(SLR.model)

Call:
lm(formula = Y ~ X)

Residuals:
Min 1Q Median 3Q Max
-171116 -13037 -8772 6010 185270
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) 14626.413 5410.229 [ A ] 0.00875 **
X 12.594 [ B ] 9.610 4.23e-14 ***

---

Signif. codes: 0 *** 0.001 ** 0.01 * 0.05 . 0.1 1
Residual standard error: 36910 on 65 degrees of freedom
Multiple R-squared: 0.5869, Adjusted R-squared: 0.5805
F-statistic: 92.35 on 1 and 65 DF, p-value: 4.235e-14

(a) Calculate the value of the sample test statistic for [ A ].

(b) Calculate the value of the standard error in for [ B ].