[R] Hmisc latex cell background color

[Dieter Menne]

David Whiting <david.whiting <at> ncl.ac.uk> writes:

> The nearest I got to was to be able to colour row. Take a look at Table
> 10 here:
> 
> 
http://biostat.mc.vanderbilt.edu/twiki/pub/Main/StatReport/latexFineControl.pdf
> 

After some private emailing with David and downloading the latest version of 
the docs, I found the new command \cellcolor in colortbl, which makes coloring 
of single cells painless.

Deter

library(Hmisc)

x <- as.data.frame(diag(rnorm(3),nrow=3))
cellTex <- matrix(rep("", NROW(x) * NCOL(x)), nrow=NROW(x))
cellTex[2,2] <- "\cellcolor{red}"
ct <- latex(x, cellTexCmds = cellTex,numeric.dollar=FALSE)
ct$style <- "colortbl" # this forces load of colortbl (not documented?)
dvi(ct)