Baby weights, Part I. (9.1, p. 350) The Child Health and Development Studies investigate a range of topics. One study considered all pregnancies between 1960 and 1967 among women in the Kaiser Foundation Health Plan in the San Francisco East Bay area. Here, we study the relationship between smoking and weight of the baby. The variable smoke is coded 1 if the mother is a smoker, and 0 if not. The summary table below shows the results of a linear regression model for predicting the average birth weight of babies, measured in ounces, based on the smoking status of the mother.
The variability within the smokers and non-smokers are about equal and the distributions are symmetric. With these conditions satisfied, it is reasonable to apply the model. (Note that we don’t need to check linearity since the predictor has only two levels.)
\[ \begin{aligned} \widehat{score} &= \hat{\beta}_0 + \hat{\beta}_1 \times smoke\\ &= 123.05 + -8.94 \times smoke\end{aligned} \]
The slope means that children with mothers who are smokers will on average weigh 8.94 ounces then mother children who are non smokers. Children of smokers: 114.11, Children of non-smokers: 123.05.
smoke<- -8.94+123.05
nonsmoke<-8.94*0+123.05
smoke
nonsmoke
Yes, you can see the p value is approximately 0 which makes this statistically significant.
Absenteeism, Part I. (9.4, p. 352) Researchers interested in the relationship between absenteeism from school and certain demographic characteristics of children collected data from 146 randomly sampled students in rural New South Wales, Australia, in a particular school year. Below are three observations from this data set.
The summary table below shows the results of a linear regression model for predicting the average number of days absent based on ethnic background (eth: 0 - aboriginal, 1 - not aboriginal), sex (sex: 0 - female, 1 - male), and learner status (lrn: 0 - average learner, 1 - slow learner).
\[ \begin{aligned} \widehat{score} &= \hat{\beta}_0 + \hat{\beta}_1 \times eth + \hat{\beta}_2 \times sex + \hat{\beta}_3 \times lrn\\ &= 18.93+ -9.11 \times eth + 3.1 \times sex + 2.15 \times lrn\end{aligned} \]
All else being equal… If the student is not aboriginal they will be absent 9.11 less days If the student is male they will be absent 3.1 days If the student is a slow learner they will be absent 2.15 more days
The residual is -22.18
a <- 18.93 - 0 + 3.1 + 2.15
res <- 2 - a
res
R Squared : .0893 Adjusted R Squared: .0701
r <- 1-(240.57/264.17)
adjr<- 1-((1-r)*(146-1)/(146-3-1))
r
adjr
Absenteeism, Part II. (9.8, p. 357) Exercise above considers a model that predicts the number of days absent using three predictors: ethnic background (eth), gender (sex), and learner status (lrn). The table below shows the adjusted R-squared for the model as well as adjusted R-squared values for all models we evaluate in the first step of the backwards elimination process.
Which, if any, variable should be removed from the model first?
The learner status should be removed first since it has the highest adjusted r squared that is higher then the adjusted r squared for the model.
Challenger disaster, Part I. (9.16, p. 380) On January 28, 1986, a routine launch was anticipated for the Challenger space shuttle. Seventy-three seconds into the flight, disaster happened: the shuttle broke apart, killing all seven crew members on board. An investigation into the cause of the disaster focused on a critical seal called an O-ring, and it is believed that damage to these O-rings during a shuttle launch may be related to the ambient temperature during the launch. The table below summarizes observational data on O-rings for 23 shuttle missions, where the mission order is based on the temperature at the time of the launch. Temp gives the temperature in Fahrenheit, Damaged represents the number of damaged O-rings, and Undamaged represents the number of O-rings that were not damaged.
It seems the lower the temperature the more likely the o rings are to be damaged.
For each additonal degree in temperature the projected number of damaged o rings decreases by .2162. With a projected 11.663 damaged o rings of a temperature of 0.
\[ \begin{aligned} \log(\hat{p}/1-\hat{p}) &= \hat{\beta}_0 + \hat{\beta}_1 \times temp\\ \log(\hat{p}/1-\hat{p})&= 11.663+ -0.2162 \times temp\end{aligned} \]
Yes, the ambient temperature during launch clearly impacts the damage rate of o rings. With such a low p value wee also know beyond just glancing at the data that the relationship is statistically significant.
Challenger disaster, Part II. (9.18, p. 381) Exercise above introduced us to O-rings that were identified as a plausible explanation for the breakup of the Challenger space shuttle 73 seconds into takeoff in 1986. The investigation found that the ambient temperature at the time of the shuttle launch was closely related to the damage of O-rings, which are a critical component of the shuttle. See this earlier exercise if you would like to browse the original data.
\begin{center} \end{center}
where \(\hat{p}\) is the model-estimated probability that an O-ring will become damaged. Use the model to calculate the probability that an O-ring will become damaged at each of the following ambient temperatures: 51, 53, and 55 degrees Fahrenheit. The model-estimated probabilities for several additional ambient temperatures are provided below, where subscripts indicate the temperature:
\[\begin{align*} &\hat{p}_{57} = 0.341 && \hat{p}_{59} = 0.251 && \hat{p}_{61} = 0.179 && \hat{p}_{63} = 0.124 \\ &\hat{p}_{65} = 0.084 && \hat{p}_{67} = 0.056 && \hat{p}_{69} = 0.037 && \hat{p}_{71} = 0.024 \end{align*}\]
o51 <- 11.6630-(0.2162*51)
o53 <- 11.6630-(0.2162*53)
o55 <- 11.6630-(0.2162*55)
p51 <-(round(exp(o51)/(1+exp(o51))*100,2))
p53 <-(round(exp(o53)/(1+exp(o53))*100,2))
p55 <-(round(exp(o55)/(1+exp(o55))*100,2))
p51
p53
p55
Probalility of a damaged o ring at 51 degress: 65.4% Probalility of a damaged o ring at 53 degress: 55.09% Probalility of a damaged o ring at 55 degress: 44.32%
Logistical regression conditions are:
Each outcome of Yi is independent of the other outcomes and Each predictor xi is linearly related to logit(pi) if all other predictors are held constant
We know that each out come of broken o rings are idnependent of one another. We also see that there is linearity between the temperature and the logit(probability of damage)