OFFSET
1,3
EXAMPLE
565187=P(614) and 781565=P(722), where P(k) = k*(3*k-1)/2 is the k-th pentagonal number.
PROG
(PARI) lista(nn) = for (n=0, nn, my(P = n*(3*n-1)/2); if (ispolygonal(fromdigits(Vecrev(digits(P))), 5), print1(P, ", ")); ); \\ Michel Marcus, May 22 2022
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Giovanni Resta, Jan 28 2006
EXTENSIONS
0 and additional terms from Jon E. Schoenfield, May 22 2022
STATUS
approved