OFFSET
4,2
LINKS
Alois P. Heinz, Table of n, a(n) for n = 4..20000
MATHEMATICA
nmax = 60; CoefficientList[Series[Sum[Boole[PalindromeQ[k]] x^k, {k, 1, nmax}]^4, {x, 0, nmax}], x] // Drop[#, 4] &
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Ilya Gutkovskiy, Feb 06 2021
STATUS
approved