Additional typos

[ogbs]

In code chunk:

train.keeps <- c("Fate", "Sex", "Boat.dibs", "Age", "Title", 
                 "Class", "Deck", "Side", "Fare", "Fare.pp", 
                 "Embarked", "Family")

"Survived" should be added to the train.keeps assignment.