# Re: [R] plot legend: combining filled boxes and lines

From: Gabor Grothendieck <ggrothendieck_at_gmail.com>
Date: Mon, 10 Sep 2007 02:17:44 -0400

On 9/10/07, Lauri Nikkinen <lauri.nikkinen_at_iki.fi> wrote:
> Hello,
>
> I have difficulties combining boxes and lines in plot legend. I
> searched previous R-posts and found this (with no solution):
> http://tolstoy.newcastle.edu.au/R/help/06/07/30248.html. Is there a
> way to avoid boxes behind the line legends?
>
> 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)
>
> Thanks
> Lauri
>
> ______________________________________________
> R-help_at_stat.math.ethz.ch mailing list
> https://stat.ethz.ch/mailman/listinfo/r-help