OFFSET
1,2
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); }
a(nn) = {for (i = 1, nn, j = i; nb = 0; rsum = 0; while (nb < i, d = digits(j); if (startwith(d, i) && ispal(d), nb++; rsum += j; ); j++; ); print1(rsum, ", "); ); } \\ Michel Marcus, Sep 14 2013
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Amarnath Murthy, Nov 08 2002
EXTENSIONS
More terms from Sascha Kurz, Jan 03 2003
Several terms starting from n=12 onwards corrected by Michel Marcus, Sep 14 2013
STATUS
approved