OFFSET
1,1
PROG
(PARI) concatprbin(n) = { y=2; print1(10", "); forprime(x=3, n, y=eval(concat(Str(y), Str(x))); b=binary(y); ln=length(b); z=Str(b[1]); for(j=2, ln, z=concat(Str(z), Str(b[j])); ); print1(z, ", ") ) }
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Cino Hilliard, Sep 08 2003
STATUS
approved