On 12/16/14, 9:54 PM, Martin Morgan wrote:
Hi Mick --
You can see that the source code doesn't contain '...' in the final line
~/src/R-devel/src/library/base/R$ svn annotate lapply.R | grep
Internal\(l
38631 ripley .Internal(lapply(X, FUN))
and that it's been there for a long time
> so I guess you're looking at a modified version of the function... The
> implementation detail is in the comment -- FUN(X[i], ...) is evaluated in the
> frame of lapply.
>
> Martin Morgan
You may find it interesting that in the latest version of pqR, lapply is made
faster in the case where no
On 12/16/2014 08:20 PM, Mick Jordan wrote:
vapply <- function(X, FUN, FUN.VALUE, ..., USE.NAMES = TRUE)
{
FUN <- match.fun(FUN)
if(!is.vector(X) || is.object(X)) X <- as.list(X)
.Internal(vapply(X, FUN, FUN.VALUE, USE.NAMES))
}
This is an implementor question. Basically, what hap
vapply <- function(X, FUN, FUN.VALUE, ..., USE.NAMES = TRUE)
{
FUN <- match.fun(FUN)
if(!is.vector(X) || is.object(X)) X <- as.list(X)
.Internal(vapply(X, FUN, FUN.VALUE, USE.NAMES))
}
This is an implementor question. Basically, what happened to the '...'
args in the call to the .In
