Here's a simple example:

x <- 1:5
plot(x,x^2)
lines(x,x^2)
points(x,x,cex=2)
lines(x,x,lw=3)
legend("topleft",legend=c("y=x^2","y=x"),pch=1,pt.cex=1:2,lw=c(1,3))

The thickness of the circles in the legend changes with lw.  If you change
the lw argument in legend to lw=c(1,1) then the thickness of the circles
goes back to normal.  How can I make the above legend so that both the lines
and the plotting characters match what is in the graph?

	[[alternative HTML version deleted]]

