## Chapter 8: Generalized Linear Models, and Survival Analysis. Install and load the library(DAAG) before using the code. anestot <aggregate(anesthetic[, c("move", "nomove")], by = list(conc = anesthetic$conc), FUN = sum) ## The column 'conc', because from the 'by' list, is then a factor. The next line ## recovers the numeric values anestot$conc <as.numeric(as.character(anestot$conc)) anestot$t...