Completed Titanic Kaggle in R