search for: llegend

...nst the lattice paradigm somewhat, in that you short-cut the link between group variables and the appearance of the legend. There are some cases where I was missing this kind of raw command, though, and the custom legend dendrogram of the lattice book is intimidating if not a bit overkill. llegend <- function(x=0.5, y=0.5, loc=FALSE, text=c("a", "b"), unit="npc", pch=1, lty=NULL, col=seq_along(text), cex=0.6, cex.title=0.8, ...){ if(loc) { ll <- grid.locator(unit) print(ll) x <- as.numeric(ll$x) y <- as.numeric(ll$y) } lines <...