Nutrition at Starbucks, Part I. (8.22, p. 326) The scatterplot below shows the relationship between the number of calories and amount of carbohydrates (in grams) Starbucks food menu items contain. Since Starbucks only lists the number of calories on the display items, we are interested in predicting the amount of carbs a menu item has based on its calorie content.
Body measurements, Part I. (8.13, p. 316) Researchers studying anthropometry collected body girth measurements and skeletal diameter measurements, as well as age, weight, height and gender for 507 physically active individuals.19 The scatterplot below shows the relationship between height and shoulder girth (over deltoid muscles), both measured in centimeters.
\begin{center} \end{center}
gh <- lm(hgt ~ sho.gi, bdims)
summary(gh)
##
## Call:
## lm(formula = hgt ~ sho.gi, data = bdims)
##
## Residuals:
## Min 1Q Median 3Q Max
## -19.2297 -4.7976 -0.1142 4.7885 21.0979
##
## Coefficients:
## Estimate Std. Error t value Pr(>|t|)
## (Intercept) 105.83246 3.27245 32.34 <2e-16 ***
## sho.gi 0.60364 0.03011 20.05 <2e-16 ***
## ---
## Signif. codes: 0 '***' 0.001 '**' 0.01 '*' 0.05 '.' 0.1 ' ' 1
##
## Residual standard error: 7.026 on 505 degrees of freedom
## Multiple R-squared: 0.4432, Adjusted R-squared: 0.4421
## F-statistic: 402 on 1 and 505 DF, p-value: < 2.2e-16
Linear model Height = 0.60364*Shoulder_girth + 105.032
The median is nearly null, min and max are in the same magnitude.
The residual square (44.42%) remains low. The model fit the data at 44.32%
Body measurements, Part III. (8.24, p. 326) Exercise above introduces data on shoulder girth and height of a group of individuals. The mean shoulder girth is 107.20 cm with a standard deviation of 10.37 cm. The mean height is 171.14 cm with a standard deviation of 9.41 cm. The correlation between height and shoulder girth is 0.67.
slope <- 0.67*9.41/10.37
slope
## [1] 0.6079749
Since the means are coordinates of the line, we can write \(171.14 = 0.607974*107.20 + b\)
intercept <- 171.14 - 0.6079749*107.20
intercept
## [1] 105.9651
The equation of the line is \(Heigth=0.608*girth +105.9651\)
rsq <- .67*.67
rsq
## [1] 0.4489
- $R^2=44.89\%$ of the variation of heigth is explain by shoulder girth.
0.608*100 + 105.9651
## [1] 166.7651
- That random student will have 166.76 cm of height
160 - 166.76
## [1] -6.76
- The model overestimates the student heigth for 6.76 cm
Cats, Part I. (8.26, p. 327) The following regression output is for predicting the heart weight (in g) of cats from their body weight (in kg). The coefficients are estimated using a dataset of 144 domestic cats.
\begin{center} \end{center}
r <- sqrt(.6466)
r
## [1] 0.8041144
- The correlation coefficient is 0.8041
Rate my professor. (8.44, p. 340) Many college courses conclude by giving students the opportunity to evaluate the course and the instructor anonymously. However, the use of these student evaluations as an indicator of course quality and teaching effectiveness is often criticized because these measures may reflect the influence of non-teaching related characteristics, such as the physical appearance of the instructor. Researchers at University of Texas, Austin collected data on teaching evaluation score (higher score means better) and standardized beauty score (a score of 0 means average, negative score means below average, and a positive score means above average) for a sample of 463 professors. The scatterplot below shows the relationship between these variables, and also provided is a regression output for predicting teaching evaluation score from beauty score.
\begin{center} \end{center}
slope <- (4.010-3.9983)/0.0883
slope
## [1] 0.1325028