On May 2, 2009, at 7:00 PM, Alex Reynolds wrote:
> How would I set the "scales" property of a lattice levelplot, so
> that I can add specific annotations at specific positions?
>
> For example, I have a 200 x 1000 element levelplot. Along the y-axis
> (along the 1000-element axis) I would like to add annotations on the
> left side of the levelplot at elements 120, 300, 500, and 805, which
> represent clusters of interest.
>
> Currently I have no annotations in my "scales" property:
>
> colorFun <- colorRampPalette(c("white","black"))
> myLevelplot <- levelplot(
> t(scale(set.allElements))[,myLevelplot.dendrogram.order],
> scales=list(y=list(draw=F),x=list(draw=F)),
> colorkey=F, col.regions=colorFun, aspect="iso",
> xlab="", ylab="", main="test title",
> legend=(list(right> list(fun=dendrogramGrob,
> args=list(x=myLevelplot.dendrogram, ord=
> myLevelplot.dendrogram.order,
> side="right", size=15, size.add=0.0,
> add=list(rect=list(col="transparent", fill=NA))))))
> )
>
> Is there a straightforward way to add them?
Not sure since you have not provided a reproducible example and not
really defined what "annotations" means. See if you can derive a more
genral priciple by comparing with this example to the first example
on hte levelplot help page:
x <- seq(pi/4, 5 * pi, length.out = 100)
y <- seq(pi/4, 5 * pi, length.out = 100)
r <- as.vector(sqrt(outer(x^2, y^2, "+")))
grid <- expand.grid(x=x, y=y)
grid$z <- cos(r^2) * exp(-r/(pi^3))
levelplot(z~x*y, grid, cuts = 50, scales=list(log="e",
x=list(at=c(1,3.10)), y=list(at=c(1,10))), xlab="",
ylab="",
main="Weird Function", sub="with log scales", colorkey =
FALSE, region
= TRUE)
>
> Thanks,
> Alex
>
> ______________________________________________
> R-help at 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.
David Winsemius, MD
Heritage Laboratories
West Hartford, CT