Definefemale_heights, a set of mother and daughter heights sampled fromGaltonFamilies, as follows:

set.seed(1989) #if you are using R 3.5 or earlier set.seed(1989, sample.kind="Rounding") #if you are using R 3.6 or later library(HistData) data("GaltonFamilies") options(digits = 3) # report 3 significant digits female_heights <- GaltonFamilies %>% filter(gender == "female") %>% group_by(family) %>% sample_n(1) %>% ungroup() %>% select(mother, childHeight) %>% rename(daughter = childHeight) 

Question 7

0.0/2.0 points (graded)

Fit a linear regression model predicting the mothers' heights using daughters' heights.

What is the slope of the model?