> 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 ______________________________________________ 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.