inst/snippet/smoking-bbs.R

smTab2 <- rbind(NonExperimenter=c(34,4,296), 
                   Experimenter=c(15,3,213))
colnames(smTab2) <- c('Never','Hardly ever','Sometimes or a lot')
smTab2
chisq.test(smTab2)

Try the fastR package in your browser

Any scripts or data that you put into this service are public.

fastR documentation built on May 1, 2019, 11:18 p.m.