login
A077525
Last term of n-th row of A077526.
2
1, 22, 303, 414, 525, 636, 747, 858, 969, 10701, 11711, 12921, 130031, 141141, 152251, 163361, 174471, 185581, 196691, 207702, 218812, 228822, 2300032, 2401042, 2502052, 2603062, 2704072, 2805082, 2906092, 3007003
OFFSET
1,2
COMMENTS
n-th palindrome beginning with n.
PROG
(PARI) ispal(v) = {for(i=1, #v\2, if (v[i] != v[#v-i+1], return(0)); ); return(1); };
startwith(d, j) = {dj = digits(j); for (k = 1, #dj, if (d[k] != dj[k], return (0)); ); return (1); }
lista(nn) = {for (i = 1, nn, j = i; nb = 0; while (nb < i, d = digits(j); if (startwith(d, i) && ispal(d), nb++; if (nb == i, print1(j, ", "))); j++; ); ); } \\ Michel Marcus, Sep 14 2013
CROSSREFS
Sequence in context: A022746 A125457 A155785 * A083765 A061341 A088279
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Nov 08 2002
EXTENSIONS
More terms from Sascha Kurz, Jan 03 2003
Several terms starting from n=10 onwards corrected by Michel Marcus, Sep 14 2013
STATUS
approved