Hi Peter,
thanks. Yet my intention was not to discuss whether this could be done at all (never had any doubts about that), but how it could be done nicely and conveniently for the application programmer.
Best regards Wolfgang
Peter Dalgaard wrote:
Wolfgang Huber <[EMAIL PROTECTED]> writes:
Personally, I would prefer the recycling, but of course it can be also done this way:
> mapply(sprintf, "%04d %s", 1:3, "abc") %04d %s <NA> <NA> "0001 abc" "0002 abc" "0003 abc"
the only slightly unaesthetic thing being the names of the resulting vector.
...which is of course fixable with either of
mapply(sprintf, MoreArgs=list(fmt="%04d %s"), 1:3, "abc")
[1] "0001 abc" "0002 abc" "0003 abc"
mapply(sprintf, 1:3, "abc", fmt="%04d %s")
[1] "0001 abc" "0002 abc" "0003 abc"
mapply(sprintf, "%04d %s", 1:3, "abc", USE.NAMES=FALSE)
[1] "0001 abc" "0002 abc" "0003 abc"
(Only the last one is completely failsafe since the first two relies on 1:3 not being character:
if (USE.NAMES && length(dots) && is.character(dots[[1]]) && is.null(names(answer))) names(answer) <- dots[[1]] )
______________________________________________ R-devel@stat.math.ethz.ch mailing list https://stat.ethz.ch/mailman/listinfo/r-devel
