A341166 Number of partitions of n into 8 distinct nonzero decimal palindromes.

1, 1, 1, 2, 2, 3, 3, 4, 4, 4, 4, 4, 3, 3, 3, 3, 3, 3, 4, 4, 6, 7, 8, 8, 10, 10, 11, 11, 11, 11, 11, 11, 11, 11, 10, 11, 11, 11, 11, 11, 12, 12, 13, 14, 15, 16, 19, 20, 22, 24, 25, 27, 28, 29, 29, 30, 29, 31, 30, 30, 30, 30, 31, 31, 32, 33, 34, 35, 39, 39

Offset

36,4

Links

Alois P. Heinz, Table of n, a(n) for n = 36..20000

Maple

p:= proc(n) option remember; local i, s; s:= ""||n;
      for i to iquo(length(s), 2) do if
        s[i]<>s[-i] then return false fi od; true
    end:
h:= proc(n) option remember; `if`(n<1, 0,
     `if`(p(n), n, h(n-1)))
    end:
b:= proc(n, i, t) option remember; `if`(n=0, 1, `if`(t*i<n,
      0, b(n, h(i-1), t)+b(n-i, h(min(n-i, i-1)), t-1)))
    end:
a:= n-> (k-> b(n, h(n), k)-b(n, h(n), k-1))(8):
seq(a(n), n=36..105);  # Alois P. Heinz, Feb 06 2021

Crossrefs

Cf. A002113, A136522, A319473, A341155, A341156, A341157, A341158, A341159, A341165, A341167, A341168.

Sequence in context: A143489 A349393 A341155 * A274102 A261100 A372556

Adjacent sequences: A341163 A341164 A341165 * A341167 A341168 A341169

Keyword

nonn,base

Author

Ilya Gutkovskiy, Feb 06 2021

Status

approved