Skip to content
Prev 1356 / 29559 Next

(no subject)

Le 28 sept. 06 ? 16:18, Roger Bivand a ?crit :
Why would be my function plot local ? It is not.
I removed the others

============
 > plot
function (x, y, ...)
{
     if (is.null(attr(x, "class")) && is.function(x)) {
         nms <- names(list(...))
         if (missing(y))
             y <- {
                 if (!"from" %in% nms)
                   0
                 else if (!"to" %in% nms)
                   1
                 else if (!"xlim" %in% nms)
                   NULL
             }
         if ("ylab" %in% nms)
             plot.function(x, y, ...)
         else plot.function(x, y, ylab = paste(deparse(substitute(x)),
             "(x)"), ...)
     }
     else UseMethod("plot")
}
<environment: namespace:graphics>

=============================
Jacques Vernin