On Apr 20, 2013, at 7:13 PM, David Winsemius <dwinsem...@comcast.net> wrote:
> > On Apr 20, 2013, at 4:05 PM, Eva Prieto Castro wrote: > >> >> Thanks!. The problem is that I can't see the source code in .Internal(txt... > > Exactly.... which was why I provided the link to Ligges' article. (So now you > _are_ expected to do some self-study.) > Note also that the graphics code isn't exactly the easiest either (to my mind) -- perhaps you could say a bit about what you are after and we'll try to give pointers as best we're able. MW (Sorry for brain borking in the text() function earlier -- I blame it on the travel!) > -- > David. >> >> >>> text.default >> function (x, y = NULL, labels = seq_along(x), adj = NULL, pos = NULL, >> offset = 0.5, vfont = NULL, cex = 1, col = NULL, font = NULL, >> ...) >> { >> if (!missing(y) && (is.character(y) || is.expression(y))) { >> labels <- y >> y <- NULL >> } >> labels <- as.graphicsAnnot(labels) >> if (!is.null(vfont)) >> vfont <- c(typeface = pmatch(vfont[1L], Hershey$typeface), >> fontindex = pmatch(vfont[2L], Hershey$fontindex)) >> .Internal(text(xy.coords(x, y, recycle = TRUE), labels, adj, >> pos, offset, vfont, cex, col, font, ...)) >> } >> <bytecode: 0x12b4cdb4> >> <environment: namespace:graphics> >> >> Regards, >> >> Eva >> >> --- El dom, 21/4/13, David Winsemius <dwinsem...@comcast.net> escribió: >> >> De: David Winsemius <dwinsem...@comcast.net> >> Asunto: Re: [R] Source Code >> Para: "R. Michael Weylandt <michael.weyla...@gmail.com>" >> <michael.weyla...@gmail.com> >> CC: "Eva Prieto Castro" <evapcas...@yahoo.es>, "<r-h...@stat.math.ethz.ch>" >> <r-h...@stat.math.ethz.ch> >> Fecha: domingo, 21 de abril, 2013 00:45 >> >> >> On Apr 20, 2013, at 3:34 PM, R. Michael Weylandt >> <michael.weyla...@gmail.com> wrote: >> >>> >>> >>> On Apr 20, 2013, at 6:23 PM, Eva Prieto Castro <evapcas...@yahoo.es> wrote: >>> >>>> Dear all, >>>> >>>> How can I get the source code of text function? >>> >>> What is the 'text function'? >>> >>> Try typing the name of the function at the prompt without any parentheses >>> after it. If its written in R, then it should be visible. >> >> (It's not, .. or at least it might not seem so to a newbR.) >> >>> text >> function (x, ...) >> UseMethod("text") >> <bytecode: 0x10191f780> >> <environment: namespace:graphics> >> >> >> methods(text) >> text.default >> graphics:::trext.formula >> >> And then .... to go further ... I think she may need the added information >> in Uwe Ligges classic R-News article: >> >> http://cran.r-project.org/doc/Rnews/Rnews_2006-4.pdf >> >> >> -- >> David Winsemius >> Alameda, CA, USA > > David Winsemius > Alameda, CA, USA > ______________________________________________ R-help@r-project.org mailing list 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.