OFFSET
1,2
EXAMPLE
a(6)=28 since 28 = 22+0+6 = 22+1+5 = 22+2+4 = 22+3+3 = 11+9+8 =
11+11+6 and no number less than 28 has 6 such decompositions.
MATHEMATICA
palQ[n_] := n == FromDigits@Reverse@IntegerDigits@n; pt = Select[Range[0, 10001], palQ]; t = Table[0, {i, 10000}]; Do[v=pt[[i]]+pt[[j]]+pt[[k]]; If[v<10000, t[[v+1]]++ ], {i, 200}, {j, i}, {k, j}]; Table[Position[t, k][[1, 1]]-1, {k, 60}]
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Giovanni Resta, Jan 20 2006
STATUS
approved