From paul@stat.auckland.ac.nz  Tue Jul 17 03:32:48 2001
From: paul@stat.auckland.ac.nz (paul@stat.auckland.ac.nz)
Date: Tue, 17 Jul 2001 04:32:48 +0200 (MET DST)
Subject: [Rd] Re: abline() AND rect() do not obey "xpd" (clipping) (PR#750)
Message-ID: <200107170232.EAA16241@pubhealth.ku.dk>

Hi


> Also,
>       rect()
> fails similarly.
> This gives funny legend()s :
>  plot(1:10)
>  legend(1,7.5,  c("1st", "2nd", "third"), col = 1:3, lwd = 1:3, pch = 1:3)
>  op <- par(xpd = NA)
>  legend(1,11.5, c("1st", "2nd", "third"), col = 1:3, lwd = 1:3, pch = 1:3)
>  ## pch = 1 also doesn't ?!?? ?? why??  It does here :
>  points(2+ 1:8, rep(11, 8), pch = 1:8, col = "purple")
>  ## and other pch's do here
>  legend(4,11.9, c("1st", "2nd", "third"), col = 1:3, lwd = 1:3, pch = 6:4)
>  par(op)
> ## Note that there seems another peculiar clipping bug
> ##       with pch = 1 in legend


I believe the rect() problem has been fixed by the fix to PR #943 -- Martin,
can you confirm this please?

I believe the pch=1 problem is the same as reported in PR #943

Paul




-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-devel mailing list -- Read http://www.ci.tuwien.ac.at/~hornik/R/R-FAQ.html
Send "info", "help", or "[un]subscribe"
(in the "body", not the subject !)  To: r-devel-request@stat.math.ethz.ch
_._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._._


[Rd] Re: abline() AND rect() do not obey "xpd" (clipping) (PR#750)
paul@stat.auckland.ac.nz