OFFSET
0,2
COMMENTS
If n<=500, a(n) is prime only for a(1)=11, a(8)=18285670562881, and a(29). - Enrique Pérez Herrero, Jun 05 2010
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..68
FORMULA
a(n) mod 100 = 1 + 10 * (n mod 10). - Enrique Pérez Herrero, May 27 2010
MAPLE
a:= n-> parse(cat(seq(binomial(n, k), k=0..n))):
seq(a(n), n=0..15); # Alois P. Heinz, Jan 15 2024
MATHEMATICA
A003590[i_Integer] := ToExpression[StringJoin[Table[ToString[Binomial[i, j]], {j, 0, i}]]] (* Enrique Pérez Herrero, May 27 2010 *)
FromDigits[Flatten[IntegerDigits/@#]]&/@Table[Binomial[i, j], {i, 0, 15}, {j, 0, i}] (* Harvey P. Dale, Aug 11 2024 *)
PROG
(PARI) A003590(i)={ my(j, a); a=""; for(j=0, i, a=Str(a, binomial(i, j)) ); return(eval(a)); } /* Enrique Pérez Herrero, Jun 03 2010 */
CROSSREFS
KEYWORD
nonn,easy,base
AUTHOR
Matthew Wells (mwells(AT)nmt.edu)
EXTENSIONS
Offset 0 from Alois P. Heinz, Jan 15 2024
STATUS
approved