R help - May 2012 - How to use the value of "rect" to determine the location of legend

Given the attached plot,
how can I locate the center text with "Mean and SD" so that it can be
placed exactly under "---emp".?

The current code I have is this:

L = list(bquote(Em.Mean ==.(new_avg)),    bquote(Em.SD==.(new_std)),
bquote(Th.Mean ==.(theor_avg)),
    bquote(Th.SD==.(theor_sd)))

legend("topright", c(kids,"emp."), cex=0.7,
bty="n", col=c(cm.colors(6), "red"),
    pch=c(rep(19, 6), -5), lty = c(0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0), )

# How can I locate this
legend("topcenter", cex=0.5, bty="n", legend=sapply(L,
as.expression))

-G.V.

On 16.05.2012 02:13, Gundala Viswanath wrote:
> Given the attached plot,
Nothing came through.
> how can I locate the center text with "Mean and SD" so that it
can be
> placed exactly under "---emp".?
>
> The current code I have is this:
>
> L = list(bquote(Em.Mean ==.(new_avg)),    bquote(Em.SD==.(new_std)),
> bquote(Th.Mean ==.(theor_avg)),
>      bquote(Th.SD==.(theor_sd)))
Not reproducible.

Uwe Ligges


> legend("topright", c(kids,"emp."), cex=0.7,
bty="n", col=c(cm.colors(6), "red"),
>      pch=c(rep(19, 6), -5), lty = c(0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0), )
>
> # How can I locate this
> legend("topcenter", cex=0.5, bty="n", legend=sapply(L,
as.expression))
>
> -G.V.
>
>
>
> ______________________________________________
> 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.