Message-ID: <5281616E.7070003@bitwrit.com.au>
Date: 2013-11-11T22:59:58Z
From: Jim Lemon
Subject: colours legend, for loop,density plot
In-Reply-To: <DUB125-W1108F7613E140D206A8FC6B9FF0@phx.gbl>
On 11/12/2013 09:52 AM, M? Teresa Martinez Soriano wrote:
> normal<-sort(rnorm(1000)) cauchy<-sort(rcauchy(1000)) t3<-sort(rt(1000,3)) t10<-sort(rt(1000, 10))
> col<-c("green","blue","orange","purple") v<-list(normal,cauchy,t3,t10) names(v)<-c("Normal", "Cauchy", "T-stud 3 df", "T-stud 10 df")
> par(mfrow=c(1,2)) plot(density(normal),col=col[[1]],main="Funciones de densidad") for ( i in 2:4) { lines(density(v[[i]]),col=col[[i]],lty=i+2) }
> legend(x=-4,y=0.3,names(v),col=col,cex=0.6)
>
Hi Tere,
Try this:
legend(x=-2,y=0.04,names(v),col=col,cex=0.6,lty=c(1,4:6))
Jim