Michael, I think this is what you are looking for. Rich
library(Hmisc) tmp <- array(rnorm(60), c(3,4,5), list(letters[1:3],LETTERS[4:7],letters[8:12])) ## latex(tmp) ftable(tmp) dviname <- latex(ftable(tmp)) ft <- ftable(tmp) dviname <- latex(ft, colheads=attr(ft,"col.vars")[[1]], rowname=attr(ft,"row.vars")[[2]], rgroup=attr(ft,"row.vars")[[1]], n.rgroup=c(4,4,4)) [[alternative HTML version deleted]] ______________________________________________ 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.