initial commit week2 of rprogramming
corrected assignment to dataframe