Hello!
I am writting a function, which should recycle one of its arguments if
length of the argument is approprate i.e. something like
foo <- function(x, a)
{
n <- length(x)
if(length(a) < n) { # recycle a
oldA <- a
a <- vector(length=n)
a[1:n] <- oldA
}
## ...
return(a)
}
foo(c(1, 2), a=c(1, 2))
foo(c(1, 2), a=c(1))
I am now wondering if there is any general/generic functions for such task.
Thanks!
--
Lep pozdrav / With regards,
Gregor Gorjanc
----------------------------------------------------------------------
University of Ljubljana PhD student
Biotechnical Faculty
Zootechnical Department URI: http://www.bfro.uni-lj.si/MR/ggorjan
Groblje 3 mail: gregor.gorjanc <at> bfro.uni-lj.si
SI-1230 Domzale tel: +386 (0)1 72 17 861
Slovenia, Europe fax: +386 (0)1 72 17 888
----------------------------------------------------------------------
"One must learn by doing the thing; for though you think you know it,
you have no certainty until you try." Sophocles ~ 450 B.C.
______________________________________________
[email protected] 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.
