get_attendance_data = function(){
    ##
    ## xpdf ../EBook/Applied_Linear_Models_with_R.pdf 116 &
    ##
    DF = read.csv('../../Data/baseball_attendance.csv', header=TRUE)
    DF
}