Easy: R> paste(rep(letters[1:3], 3), rep(letters[24:26], each=3), sep="") [1] "ax" "bx" "cx" "ay" "by" "cy" "az" "bz" "cz" R> nitter.vloup.ch/MilesMcBain/stat…
3
1
15
Beg to differ. Mine is still shorter than yours, and about eighty times faster (!!), see your gist.

Jun 16, 2017 · 11:19 PM UTC

1
1
Replying to @eddelbuettel
Challenge accepted :) github.com/wlandau/wildcard v1.0.1 on CRAN just arrived, builds pending