Hi,
I went for a slight alteration of your solution
x1<-c(1,2,3,4,NA ,NA ,NA, 3, 1, 1, 1, 1, 2, 2, 3, 4, 4)
x2<-c(2,3,4,3,4,3,4,2,2,3,4,NA,NA,NA,NA,4,3)
x3<-c(1,1,1,1,"aaa",2,2,2,3,3,3,3,4,4,4,1,2)
m<-data.frame(x1,x2,x3)
m<-replace(m,is.na(m),"NA")
levels=unique(as.vector(as.matrix(m)))
mapply(function(x) table(factor(levels)), m)
Many thanks for the help of both of you.
Balázs
Ivar Herfindal wrote:
>
>
> > mapply(function(x) table(factor(ifelse(is.na(x), "NA", x),
> levels=c("NA",1,2,3,4))), m)
>
>
--
View this message in context:
http://www.nabble.com/frequency-table-across-multiple-variables-tp19567838p19569510.html
Sent from the R help mailing list archive at Nabble.com.
______________________________________________
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.
