apply(Titanic, c("Class", "Survived"), sum)