it doesn't actually- this should work:
expand.call <- function(call=sys.call(sys.parent(1)), expand.dots = TRUE)
# similar to match.call, but with all formal args not the specified ones
only
{
ans <- as.list(call)
frmls <- formals(deparse(ans[[1]]))
add <- which(!(names(frmls) %in% nam
This does what you want:
expand.call <- function(definition = NULL, call = sys.call(sys.parent()),
expand.dots = TRUE)
# like match.call, but with all formal args instead of only the specified
ones
{
ans <- as.list(match.call(definition, call, expand.dots))
frmls <- formals(deparse(ans[[1]
2 matches
Mail list logo