Displaying 1 result from an estimated 1 matches for "mxnam".
Did you mean:
xnam
2012 Sep 24
1
Question lattice SplomT
...;,
hist = "h", adjust = 1, hist.col = trellis.par.get("strip.background")$col[5], cex.diag = 1, h.diag=0.4, colYonX = "red", colXonY = "blue", ...) {
stopifnot (hist %in% c("h", "d", "b"))
data <- data.frame(data)
mxnam <- max(nchar(names(data)))
lnam <- ncol(data)
ce <- 100*cex.diag*get.gpar()$cex/lnam
cexd <- ce/mxnam
cexn <- ce/5
print(splom(~data, as.matrix = TRUE, main = mainL, xlab = xlabL,
upper.panel = function(x, y, breaks = NULL, ...) {
minS <- 0.05
ccr &...