[R] Antwort: Re: legend with filled boxes AND lines

From: <florian.koller_at_gfk.com>
Date: Tue 04 Jul 2006 - 03:23:14 EST


Hi Martin,

I know about the merge command, but I want a line without the box in the legend. Ideally I would need some argument that tells the fill subcommand not only to suppress the box color (see example below), but also to suppress the frame of the fill box. Alternatively if someone could tell me how to modify the color of the frame, this would help, too, because I could simply set it to the bg command.

x1 <- rnorm(100)
x2 <- rnorm(100, 2)
hist(x1, main = "", col = "orange",ylab = "density", xlab = "x", freq = F, density = 55,

     xlim = c(-2, 5), ylim = c(0, 0.5))
par(new = T)
hist(x2, main = "", col = "green", ylab = "", xlab = "",axes = F, xlim = c(-2, 5), ylim = c(0, 0.5), density = 45, freq = F)

abline(v = mean(x1), col = "orange", lty = 2, lwd = 2.5)
abline(v = mean(x2), col = "green", lty = 2, lwd = 2.5)
legend(3, 0.45, legend = c("x1", "x2", "mean(x1)", "mean(x2)"),
       col = c("orange", "green"), fill=c("orange","green", 0, 0),
       lty = c(0, 0, 2, 2), merge = T)


Thank you,
Florian Koller

Martin Maechler <maechler@stat.math.ethz.ch> schrieb am 03/07/2006 18:41:54:

> Did you try legend(......, lty=..., fill=..., merge = TRUE) ?
>
> In an example I just tried, this allowed to give filled boxes
> *and* lines.
>
> Please give a reproducible example of what you did -- maybe by
> modifying one of the many example(legend) examples.
>
> Martin Maechler, ETH Zurich
>
> >>>>> "florian" == florian koller <florian.koller@gfk.com>
> >>>>> on Mon, 3 Jul 2006 13:40:33 +0200 writes:
>
> florian> Dear all,
>
> florian> Is there a straightforward way to create a legend
> florian> box that has both filled boxes and lines? So far I
> florian> have built around this problem by creating two
> florian> legends (with bty = "n") and manually drawing a box
> florian> around both (but this is cumbersome, because I have
> florian> to check upon the y coordinates of the legends
> florian> every time).
>
> florian> If I do something like > legend( ...,c("X1","X2",
> florian> "mean"), fill = c("red", "blue", 0), lty = (0,0,2))
> florian> < , I cannot get rid of the unfilled box or change
> florian> the color of the fill box border (from its default
> florian> color "black"), and I end up with two filled boxes
> florian> and an empty, black-lined box plus the line as a
> florian> legend for the third argument "mean". This trick
> florian> therefore only works if I define "black" as the bg
> florian> color for the complete legend box (because it masks
> florian> the empty box from the fill argument). So, if there
> florian> is a command to modify the color of the fill box
> florian> border line (not the legend box border line), this
> florian> would help me, too (still not ideal, though...).
>
> florian> Thanks,
> florian> Florian
>
>
>
> florian> ______________________
> florian> Florian Koller
> florian> GfK Fernsehforschung GmbH
> florian> Research Consulting & Development
> florian> Nordwestring 101
> florian> D-90319 Nürnberg
> florian> Fon +49 (0)911 395-3554
> florian> Fax +49 (0)911 395-4130
> florian> www.gfk.de / www.gfk.com
>
>
>
> florian> _________________________
>
> florian> Diese E-Mail (ggf. nebst Anhang) enthält vertrauliche
> und/oder rechtlich
> florian> geschützte Informationen. Wenn Sie nicht der richtige
> Adressat sind, oder
> florian> diese E-Mail irrtümlich erhalten haben, informieren Sie
> bitte sofort den
> florian> Absender und vernichten Sie diese Mail. Das unerlaubte
> Kopieren sowie die
> florian> unbefugte Weitergabe dieser Mail ist nicht gestattet.
>
> florian> This e-mail (and any attachment/s) contains
> confidential and/or privileged
> florian> information. If you are not the intended recipient (or
> have received this
> florian> e-mail in error) please notify the sender immediately
> and destroy this
> florian> e-mail. Any unauthorised copying, disclosure or
> distribution of the
> florian> material in this e-mail is strictly forbidden.
>
> florian> ______________________________________________
> florian> R-help@stat.math.ethz.ch mailing list
> florian> https://stat.ethz.ch/mailman/listinfo/r-help
> florian> PLEASE do read the posting guide! http://www.R-project.
> org/posting-guide.html



R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html Received on Tue Jul 04 03:27:30 2006

Archive maintained by Robert King, hosted by the discipline of statistics at the University of Newcastle, Australia.
Archive generated by hypermail 2.1.8, at Tue 04 Jul 2006 - 06:14:43 EST.

Mailing list information is available at https://stat.ethz.ch/mailman/listinfo/r-help. Please read the posting guide before posting to the list.