Displaying 2 results from an estimated 2 matches for "gsavepars".
1997 Jul 29
0
R-alpha: more graphics: lwd, persistent lty settings
...de into slides).
I will try to work on this, but I wouldn't mind if someone got there
before me.
Also: the effects of setting lty are sometimes unnecessarily persistent
-- for example in the example below the box around the legend is drawn in
line type 2 (dashed) -- I would think that the GSavePars/GRestorePars
calls at the beginning and end of abline (in plot.c) ought to do the job,
but I haven't had time to go through it in detail ...
x _ (1:100)/10
plot(x,sin(x))
abline(h=0,lty=2)
legend(0,-0.1,"a",pch=1)
Benjamin Bolker Dep't of Ecology and Evolutionary Biol...
1997 Jul 30
0
R-alpha: line types
...33,438 ****
--- 433,439 ----
}
if(fg != NA_INTEGER) {
SetColor(fg);
+ SetLinetype(GP->lty);
PostScriptOpenRectangle(psfp, x0, y0, x1, y1);
}
}
*** plot.c.orig Tue Jul 29 16:43:34 1997
--- plot.c Tue Jul 29 16:51:02 1997
***************
*** 875,880 ****
--- 875,883 ----
GSavePars();
+ if(nlty && INTEGER(lty)[i % nlty] != NA_INTEGER) GP->lty = INTEGER(lty)[i % nlty];
+ else GP->lty = DP->lty;
+
xl = REAL(sxl);
xr = REAL(sxr);
yb = REAL(syb);
Benjamin Bolker Dep't of Ecology and Evolutionary Biology,
ben@eno.princeton.edu Prin...