Update titanic.R