intro_to_lm_summary.R

galton <- read.csv("http://blog.yhathq.com/static/misc/galton.csv",
                    header=TRUE, stringsAsFactors=FALSE)
summary(galton)
#     child          parent    
# Min.   :61.7   Min.   :64.0  
# 1st Qu.:66.2   1st Qu.:67.5  
# Median :68.2   Median :68.5  
# Mean   :68.1   Mean   :68.3  
# 3rd Qu.:70.2   3rd Qu.:69.5  
# Max.   :73.7   Max.   :73.0  

head(galton)
#  child parent
#1  61.7   70.5
#2  61.7   68.5
#3  61.7   65.5
#4  61.7   64.5
#5  61.7   64.0
#6  62.2   67.5