On Apr 20, 2013, at 7:13 PM, David Winsemius <[email protected]> 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 <[email protected]> escribió:
>>
>> De: David Winsemius <[email protected]>
>> Asunto: Re: [R] Source Code
>> Para: "R. Michael Weylandt <[email protected]>"
>> <[email protected]>
>> CC: "Eva Prieto Castro" <[email protected]>, "<[email protected]>"
>> <[email protected]>
>> Fecha: domingo, 21 de abril, 2013 00:45
>>
>>
>> On Apr 20, 2013, at 3:34 PM, R. Michael Weylandt
>> <[email protected]> wrote:
>>
>>>
>>>
>>> On Apr 20, 2013, at 6:23 PM, Eva Prieto Castro <[email protected]> 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
>
______________________________________________
[email protected] 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.