A144370 Shifts 6 places left under Dirichlet convolution.

1, 1, 1, 1, 1, 1, 1, 2, 2, 3, 2, 4, 2, 6, 5, 8, 4, 12, 4, 14, 12, 21, 8, 30, 8, 36, 26, 46, 16, 74, 17, 76, 56, 106, 32, 166, 34, 172, 116, 220, 66, 369, 68, 352, 236, 478, 132, 776, 136, 750, 486, 972, 264, 1640, 273, 1522, 980, 2020, 528, 3360, 550, 3152, 1968, 4072

Offset: 1

Author

Alois P. Heinz, Sep 18 2008

Keywords

• eigen
• nonn

Links

• Alois P. Heinz, Table of n, a(n) for n = 1..1000
• N. J. A. Sloane, Transforms

Crossrefs

6th column of A144374. Cf. A000005.

Programs

Maple

k:= 6: with (numtheory): dck:= proc(b,c) proc(n, k) option remember; add (b(d,k) *c(n/d,k), d=`if`(n<0,{}, divisors(n))) end end: B:= dck(T,T): T:= (n, k)-> if n<=k then 1 else B(n-k, k) fi: a:= n-> T(n,k): seq (a(n), n=1..70);

Formula

G.f.: x + x^2 + x^3 + x^4 + x^5 + x^6 * (1 + Sum_{i>=1} Sum_{j>=1} a(i)*a(j)*x^(i*j)). - Ilya Gutkovskiy, May 09 2019