inst/snippets/phs.R

phs <- cbind(c(104, 189), c(10933, 10845)); phs
rownames(phs) <- c("aspirin", "placebo")                  # add row names
colnames(phs) <- c("heart attack", "no heart attack")     # add column names
phs 
xchisq.test(phs)
rpruim/Lock5withR documentation built on May 28, 2019, 1:31 a.m.