Thank you very much! Both answers are great! I'll give the complete example
(drawn from the varpart help) for future list readers.


data(mite)
data(mite.env)
data(mite.pcnm)
mod <- varpart(mite, ~ SubsDens + WatrCont, ~ Substrate + Shrub + Topo,
   mite.pcnm, data=mite.env, transfo="hel")
plot(mod)
mtext("Variation partitioning")

text(1.6, 0.6, "X2")
text(-0.6, 0.6, "X1")
text(-0.1, -1.5, "X3")

plot(mod)
#  In Windows, after the following text function then click at the
#  three desired locations of the plot and then right-click stop
text(locator(), c("X1","X2","X3"), cex=1.2)


Cheers, Emili

On 8/04/11 12:46 PM, "Ingolf Kuehn" <ingolf.kuehn at ufz.de> wrote:

> Dear Emili,
> 
> text works:  the origin of the plot is in the centre upper left circle
> (X1 | X2+X3). Hence text(0, 0, "X1") would overwrite the "0.04".
> Similarly: see text(1, 0, "X2"), text(0.5, -.86, "X3")
> 
> This might help you finding the correct coordinates.
> 
Emili,

You can use locator() function to find the coordinates. It is also possible
to have locator() in the text() command. If you have plotted the varpart()
result, you can do

text(locator(), "My Title", cex=1.2)

Then click the graph with the mouse button-1 (left) where you want to have
your title, then do something that makes the locator() exit to show text "My
Title". (This is a good opportunity to panic if you don't know yet how to
exit locator(): you better check the documentation of ?locator before-hand
to see how to behave in your operating system and graphical device. I
clicked cmd-mouse in my one-button MacBook trackpad when the graph was in
the X11 window, but the manual tells you to hit ESC in quartz graphics, and
Windows may have something different.)

I have considered adding circle labelling to vegan after seeing my mate
using these labels, but I haven't done that yet (contributions are welcome
and will be credited in the documentation).

Cheers, Jari Oksanen

_______________________________________________
R-sig-ecology mailing list
R-sig-ecology@r-project.org
https://stat.ethz.ch/mailman/listinfo/r-sig-ecology

Reply via email to