
Thanks!. The problem is that I can't see the source code in .Internal(txt...


> 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 <dwinsemius@comcast.net> escribió:

De: David Winsemius <dwinsemius@comcast.net>
Asunto: Re: [R] Source Code
Para: "R. Michael Weylandt <michael.weylandt@gmail.com>" <michael.weylandt@gmail.com>
CC: "Eva Prieto Castro" <evapcastro@yahoo.es>, "<r-help@stat.math.ethz.ch>" <r-help@stat.math.ethz.ch>
Fecha: domingo, 21 de abril, 2013 00:45


On Apr 20, 2013, at 3:34 PM, R. Michael Weylandt <michael.weylandt@gmail.com> wrote:

> 
> 
> On Apr 20, 2013, at 6:23 PM, Eva Prieto Castro <evapcastro@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


	[[alternative HTML version deleted]]

