OFFSET
1,1
COMMENTS
(10^(2*n)+10^n+1)^3 is palindrome.
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..158
factordb, 10^(2*n)+10^n+1.
FORMULA
MATHEMATICA
f[n_]:=Max[Transpose[FactorInteger[10^(2n)+10^n+1]][[1]]]; Array[f, 20] (* Harvey P. Dale, Jun 10 2011 *)
PROG
(PARI) u(n)=10^(2*n)+10^n+1; for(n=1, 30, f=factor(u(n)); print1(f[matsize(f)[1], 1], ", ")) \\ Joerg Arndt, May 27 2011
CROSSREFS
KEYWORD
nonn,base,changed
AUTHOR
Vladimir Shevelev, May 21 2011
STATUS
approved