login
A077527
Row sums of triangle in A077526.
2
1, 24, 339, 866, 1605, 2556, 3719, 5094, 6681, 83910, 92121, 126052, 266303, 427674, 610165, 813776, 1038507, 1284358, 1551329, 1837540, 2146652, 2246984, 4887236, 7498608, 10311000, 13324412, 16538844, 19954296, 23570768, 27385390
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
Sequence in context: A125459 A258705 A264454 * A083766 A056634 A022748
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