inst/snippets/Figure5.7.R

Dolphin2 <- rbind(
  do(8)  *  data.frame(response = "Improve",    swimming = "Control"),
  do(5)  *  data.frame(response = "Improve",    swimming = "Dolphin"),
  do(7)  *  data.frame(response = "NotImprove", swimming = "Control"),
  do(10) *  data.frame(response = "NotImprove", swimming = "Dolphin")
   )
rpruim/ISIwithR documentation built on May 28, 2019, 1:30 a.m.