[Rd] sprintf - was formatC with illegal input crashes Rgui (PR#7686)

[Peter Dalgaard]

Wolfgang Huber <huber at ebi.ac.uk> 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]]
)
-- 
   O__  ---- Peter Dalgaard             Blegdamsvej 3  
  c/ /'_ --- Dept. of Biostatistics     2200 Cph. N   
 (*) \(*) -- University of Copenhagen   Denmark      Ph: (+45) 35327918
~~~~~~~~~~ - (p.dalgaard at biostat.ku.dk)             FAX: (+45) 35327907