Thanks Duncan, Dropping the extra columns might be the way forward. I'm sure I can work out how to embed latex into a markdown document ;-)
On Tue, Nov 25, 2014 at 4:37 PM, Duncan Murdoch <murdoch.dun...@gmail.com> wrote: > On 25/11/2014 3:12 PM, Tom Wright wrote: > >> Hi, >> This problem has me stumped so I thought I'd ask the experts. I'm trying >> to create a pretty summary table of some data (which patients have had >> what tests at what times). Ideally I'd like to knitr this into a pretty >> PDF for presentation. >> If anyone has pointers I'll be grateful. >> >> require(tables) >> require(reshape2) >> >> data<-data.frame('ID'=paste0('pat',c(rep(1,8),rep(2,8))), >> 'Time'=c(1,1,1,1,2,2,2,2,3,3,3,3,4,4,4,4), >> 'Eye'=rep(c('OS','OS','OD','OD'),4), >> 'Measure'=rep(c('Height','Weight'),8)) >> >> tabular(Measure~factor(ID)*factor(Time)*factor(Eye),data) >> #All levels of Time are repeated for all IDs, I'd prefer to just show >> the relevant times. >> > > You can drop certain rows of the table. See the last example in > ?tabular. (It's possible to do logical indexing, but a little harder. I > think the vignette has an example of this...) > > You can use latex() on the results, and display them in a knitr document. > > Duncan Murdoch > >> >> tabular(Measure~factor(ID)*Time*factor(Eye),data) >> #Time is getting collapsed by ID >> >> data$value=1 >> dcast(data,Measure~ID+Time+Eye) >> #close but not very pretty >> >> ______________________________________________ >> 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. >> > > [[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.