r scripts and graphics for kaggle titanic challenge