Stat3022HW7 - Homework 7 Brad Price March 29, 2010 Problem...

Info iconThis preview shows pages 1–3. Sign up to view the full content.

View Full Document Right Arrow Icon
Homework 7 Brad Price March 29, 2010 Problem 10.13 1. > mod<-lm(BAC˜Beers) > summary(mod) Call: lm(formula = BAC ˜ Beers) Residuals: Min 1Q Median 3Q Max -0.027118 -0.017350 0.001773 0.008623 0.041027 Coefficients: Estimate Std. Error t value Pr(>|t|) (Intercept) -0.012701 0.012638 -1.005 0.332 Beers 0.017964 0.002402 7.480 2.97e-06 *** --- Signif. codes: 0 *** 0.001 ** 0.01 * 0.05 . 0.1 1 Residual standard error: 0.02044 on 14 degrees of freedom Multiple R-squared: 0.7998,Adjusted R-squared: 0.7855 F-statistic: 55.94 on 1 and 14 DF, p-value: 2.969e-06 2. We can see what the slope is signficicant which means that dringking more beers increases BAC. 3. > predict(mod,data.frame("Beers"=5), interval="prediction") fit lwr upr 1
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
1 0.0771182 0.03191712 0.1223193 Problem 10.14 1. > summary(dat) Area IBI Min. : 2.00 Min. :29.00 1st Qu.:16.00 1st Qu.:55.00 Median :26.00 Median :71.00 Mean :28.29 Mean :65.94 3rd Qu.:34.00 3rd Qu.:82.00 Max. :70.00 Max. :91.00 > sd(dat) Area IBI 17.71417 18.27955 > mean(dat)
Background image of page 2
Image of page 3
This is the end of the preview. Sign up to access the rest of the document.

Page1 / 3

Stat3022HW7 - Homework 7 Brad Price March 29, 2010 Problem...

This preview shows document pages 1 - 3. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online