Looks like you may need to include Survived in df.train.munged. Getting this error:
training.rows <- createDataPartition(df.train.munged$Survived,
-
Error in createDataPartition(df.train.munged$Survived, p = 0.8, list = FALSE) :
y must have at least 2 data points
colnames(df.train.munged)
[1] "Fate" "Sex" "Boat.dibs" "Age" "Title" "Class" "Deck"
[8] "Side" "Fare" "Fare.pp" "Embarked" "Family"