On 11-07-30 3:56 PM, Megh Dal wrote:
Dear all, I am looking for some procedure to apply 'ifelse' condition on
function. I have created an alternative to lapply() function with exactly same
set of arguments named lapply1(), however with different internal codes.
Therefore I want something like, if (some condition) then call lapply1()
otherwise lapply() function. Ofcourse I can create a complete if()... else()...
like of coding however wondering something may be better available because the
arguments are all common.
Write it like this:
if (condition) f <- lapply1
else f <- lapply
f(args)
or even shorter:
f <- if (condition) lapply1 else lapply
f(args)
or shortest:
(if (condition) lapply1 else lapply)(args)
Duncan Murdoch
______________________________________________
R-help@r-project.org 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.
