untested x <- lapply(names(infert),function(a)table(infert[[a]]))
extend this to the rest of your problem. Sent from my iPad On May 23, 2011, at 20:33, "Sparks, John James" <jspa...@uic.edu> wrote: > Dear R Helpers, > > First, I apologize for asking for help on the first of my topics. I have > been looking at the posts and pages for apply, tapply etc, and I know that > the solution to this must be ridiculously easy, but I just can't seem to > get my brain around it. If I want to produce a set of tables for all the > variables in my data, how can I do that without having to type them into > the table command one by one. So, I would like to use (t? s? r?)apply to > use one command instead of the following set of table commands: > > data(infert, package = "datasets") > attach(infert) > > table.education<-table(education) > table.age<-table(age) > table.parity<-table(parity) > etc. > > > To make matters worse, what I subsequently need is the chi-square for each > and all of the pairs of variables. Such as: > > chi.education.age<-chisq.test(table(education,age)) > chi.education.parity<-chisq.test(table(education,parity)) > chi.age.parity<-chisq.test(table(age,parity)) > etc. > > Your guidance would be much appreciated. > > --John J. Sparks, Ph.D. > > ______________________________________________ > R-help@r-project.org mailing list > https://stat.ethz.ch/mailman/listinfo/r-help > PLEASE do read the posting guide http://www.R-project.org/posting-guide.html > and provide commented, minimal, self-contained, reproducible code. ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.
