How about:
par(omi = c(1, 1, 1, 1), xpd = NA)
x1 <- 1:10
x2 <- sqrt(x1)
plot(x1)
points(x2,col="red",pch=3)
legend(par("usr")[1],par("usr")[3] -
1.5,legend=c("First","Second"),col=c("black","red"),pch=c(1,3))
?
Note that you will have to play with the -1.5 to get it right in general.
Partha
"Laura Holt" <[EMAIL PROTECTED]>
Sent by: [EMAIL PROTECTED]
08/19/2004 10:53 PM
To: [EMAIL PROTECTED]
cc:
Subject: [R] legends on the outside of the "box"
Hi R People:
Here is a simple set of commands:
>x1 <- 1:10
>x2 <- sqrt(x1)
>plot(x1)
>points(x2,col="red",pch=3)
>legend(2,8,legend=c("First","Second"),col=c("black","red"),pch=c(1,3))
>
Fine.
Now, I would like to put the legend box on the outside of the plot itself,
perhaps in the lower
left hand corner.
I've been messing with mtext, but to no avail.
Any help would be much appreciated.
R Version 1.9.1 Windows
Thanks,
Laura Holt
mailto: [EMAIL PROTECTED]
______________________________________________
[EMAIL PROTECTED] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
______________________________________________
[EMAIL PROTECTED] mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide! http://www.R-project.org/posting-guide.html
