A264668 a(n) = A264600(n) - A061486(n).

0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 9, 18, 27, 36, 45, 54, 63, 72, 81, 0, 8, 16, 24, 32, 40, 48, 56, 64, 72, 0, 7, 14, 21, 28, 35, 42, 49, 56, 63

Offset: 0

Author

Alois P. Heinz, Nov 20 2015

Keywords

• nonn
• look
• base

Links

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

Crossrefs

Cf. A061486, A264600.

Programs

Maple

with(combinat):
f:= n-> (l-> add(mul(l[i], i=w), w=choose(
         nops(l)))-1)(convert(n, base, 10)):
g:= proc(n) option remember; `if`(n=0, 0,
      irem(n, 10, 'r')*(r+1)+g(r))
    end:
a:= n-> g(n)-f(n):
seq(a(n), n=0..150);