[R] Histograms: Boxes and lines

[r at quantide.com]

Could be ...

legend("topright",legend=c("Histogram","Kernel Density
Estimate"),lty=c(NA,1), lwd=c(NA,2), pch = c(15, NA), col = 
c("lightblue", "black"), merge=TRUE,inset=.01,cex=.8,adj=0)

A.

John Kerpel wrote:
> Hi folks!  I'm trying to get a histogram legend to give me a filled box and
> a line.  The problem is I keep getting both filled boxes and a line.  How
> can I get rid of the second box from the code below?
>
>
>
> x<-rnorm(1000,mean=0,sd=1)
>
> hist(x, breaks = 50, main="Histogram of x",freq=FALSE,
>
> xlab=" x", ylab="Density",col="lightblue", border="black")
>
> x_dens<-density(x,kernel="gaussian")
>
> points(x_dens,type="l",lwd=3)
>
> legend("topright",legend=c("Histogram","Kernel Density
> Estimate"),lty=c(-1,1),lwd=c(-1,2),fill=c("lightblue"),merge=TRUE,inset=.01,cex=.8,adj=0)
>
>
>
> Thx!  John
>
> 	[[alternative HTML version deleted]]
>
> ______________________________________________
> 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.
>
>