data(singapore)Hokhien/Teochew" and 0 represent "Cantonese/Other".Bev".Bev" is recoded into the numeric indicator variable "Everhotbev": singapore$Everhotbev <- ifelse(singapore$Bev >= 1, 1, 0)http://faculty.washington.edu/heagerty/Courses/b513/WEB2002/datasets.html