Dear R-users, would you know a nice way to use the command "lend" in the legend?
The following code gives you a really simple example and a inefficient workaround. Thanks in advance for any suggestion. Best, Giancarlo plot(c(1,1), lwd=15, lend=2, t="l") lines(c(0.8, 0.8), lwd=15, lend=1, col=2, lty=3) legend("topright", legend=c("bla", "bla1"), col=1:2, lty=c(1,3), lwd=15, cex=3) plot(c(1,1), lwd=15, lend=2, t="l") lines(c(0.8, 0.8), lwd=15, lend=1, col=2, lty=3) lege <- legend("topright", legend=c("bla", "bla1"), col=1:2, pch=c(15,15), lty=0, cex=3, pt.cex=2.5, bty="n") points(lege$rect$left,lege$text$y[1], pch=15, cex=2.5, col=1) points(lege$rect$left+0.03,lege$text$y[1], pch=15, cex=2.5, col=1) points(lege$rect$left+0.05,lege$text$y[1], pch=15, cex=2.5, col=1) points(lege$rect$left,lege$text$y[2], pch=15, cex=2.5, col=2) =========================================== Camarda Carlo Giovanni PhD-Student Max Planck Institute for Demographic Research Konrad-Zuse-Strasse 1 18057 Rostock, Germany Tel: +49 (0)381 2081 172 Fax: +49 (0)381 2081 472 [EMAIL PROTECTED] =========================================== ---------- This mail has been sent through the MPI for Demographic Rese...{{dropped}} ______________________________________________ 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 and provide commented, minimal, self-contained, reproducible code.