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
REFERENCES
Alfred S. Posamentier, Math Charmers, Tantalizing Tidbits for the Mind, Prometheus Books, NY, 2003, page 273.
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
