> On Jun 14, 2017, at 5:52 PM, Jeff Newmiller <jdnew...@dcn.davis.ca.us> wrote: > > Sigh. I never load packages in .Rprofile to avoid the irreproducibility trap. > Might seem drastic to some, but I don't feel much pain because I almost > always edit my code in a file rather than on the fly at the console, and > re-run it frequently from a fresh R process to check my progress.
Yes, <sigh>. But I am a long-time user of the rms/Hmisc combo, as well as the survival package, so near the top of my .Rprofile is: require(lattice) require(sos) require(rms) Should I be ashamed of that? I suppose I should, and I _am_ ashamed of some of the other stuff in there ....<delete>, <delete> ... and I've been meaning to address my manifold deficiencies w.r.t. irreproducibility by moving to RStudio, but I keep putting it off. -- David. > -- > Sent from my phone. Please excuse my brevity. > > On June 14, 2017 3:27:15 PM PDT, David Winsemius <dwinsem...@comcast.net> > wrote: >> >>> On Jun 14, 2017, at 1:53 PM, Rolf Turner <r.tur...@auckland.ac.nz> >> wrote: >>> >>> On 15/06/17 05:29, David Winsemius wrote: >>>>> On Jun 14, 2017, at 10:18 AM, David Winsemius >> <dwinsem...@comcast.net> wrote: >>>>> >>>>> >>>>>> On Jun 14, 2017, at 9:46 AM, Jeff Newmiller >> <jdnew...@dcn.davis.ca.us> wrote: >>>>>> >>>>>> I don't see a question. If your question is whether R supports >> pattern fills, AFAIK it does not. If that is not your question, ask >> one. >>>>>> -- >>>>>> Sent from my phone. Please excuse my brevity. >>>>>> >>>>>> On June 14, 2017 7:57:41 AM PDT, jean-philippe >> <jeanphilippe.fonta...@gssi.infn.it> wrote: >>>>>>> dear R users, >>>>>>> >>>>>>> I would like to fill a circle with yellow stripes instead of a >> uniform >>>>>>> yellow color. To draw the circle I used the following command >> after >>>>>>> having loaded the (very nice !) plotrix library : >>>> I finally understood the question and it needs a hack to the >> draw.circle function in plotrix since the angle and density arguments >> don't get passed in: >>>> First get code for draw.circle: >>>> ------ >>>> draw.circle # then copy to console and edit >>>> draw.circle2 <- function (x, y, radius, nv = 100, border = NULL, >> col = NA, lty = 1, >>>> density=NA, angle=45, lwd = 1 ) >>>> { >>>> xylim <- par("usr") >>>> plotdim <- par("pin") >>>> ymult <- getYmult() >>>> angle.inc <- 2 * pi/nv >>>> angles <- seq(0, 2 * pi - angle.inc, by = angle.inc) >>>> if (length(col) < length(radius)) >>>> col <- rep(col, length.out = length(radius)) >>>> for (circle in 1:length(radius)) { >>>> xv <- cos(angles) * radius[circle] + x >>>> yv <- sin(angles) * radius[circle] * ymult + y >>>> polygon(xv, yv, border = border, col = col, lty = lty, >> density=density, angle=angle, >>>> lwd = lwd) >>>> } >>>> invisible(list(x = xv, y = yv)) >>>> } >>>> Now run your call to pdf with draw.circle2 instead of draw.circle. >>> >>> This is just idle curiosity, since I'm not really able to contribute >> anything useful, but I can't resist asking: When I try to run the OP's >> code I get an error: >>> >>>> Error in alpha("red", 0.4) : could not find function "alpha". >>> >>> Why does this (apparently) not happen to anyone else? Why does the >> universe pick on *me*? What is the function "alpha()"? Where is it to >> be found? >> >> I discovered some time ago that I no longer needed to load the ggplot2 >> package. I wasn't entirely happy to make this discovery since I stilll >> cling to the old lattice style. Eventually I figgured out that it was >> because one of packages that I load in my .Rprofile-file had changed >> its imports. The `alpha` function I see is from ggplot2. Resistance is >> futile. I've now been partially assimilated. >> >> >>> >>> Searching on "alpha" is of course completely unproductive; there are >> far too many (totally irrelevant) instances. >> >> >>> >>> cheers, >>> >>> Rolf >>> >>> -- >>> Technical Editor ANZJS >>> Department of Statistics >>> University of Auckland >>> Phone: +64-9-373-7599 ext. 88276 >> >> David Winsemius >> Alameda, CA, USA David Winsemius Alameda, CA, USA ______________________________________________ R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see 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.