GBM in R with the Titanic data