Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- > barplot(smoke,legend=T,beside=T,main='Smoking Status by SES')
- > smoke <- matrix(c(51,43,22,92,28,21,68,22,9),ncol=3,byrow=TRUE)
- > colnames(smoke) <- c("High","Low","Middle")
- > rownames(smoke) <- c("current","former","never")
- > smoke <- as.table(smoke)
- >
- > smoke
- High Low Middle
- current 51 43 22
- former 92 28 21
- never 68 22 9
- > barplot(smoke,legend=T,beside=T,main='Smoking Status by SES')
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement