cp's OEIS Frontend

A144369 Shifts 5 places left under Dirichlet convolution.

%I A144369 #9 May 09 2019 18:16:28
%S A144369 1,1,1,1,1,1,2,2,3,2,4,4,6,7,6,8,12,12,18,14,21,24,32,36,34,46,56,64,
%T A144369 86,69,104,118,146,172,156,208,256,300,368,316,455,512,636,748,668,
%U A144369 910,1084,1272,1552,1354,1884,2168,2644,3108,2780,3792,4440,5288,6358,5568
%N A144369 Shifts 5 places left under Dirichlet convolution.
%H A144369 Alois P. Heinz, <a href="/A144369/b144369.txt">Table of n, a(n) for n = 1..1000</a>
%H A144369 N. J. A. Sloane, <a href="/transforms.txt">Transforms</a>
%F A144369 G.f.: x + x^2 + x^3 + x^4 + x^5 * (1 + Sum_{i>=1} Sum_{j>=1} a(i)*a(j)*x^(i*j)). - _Ilya Gutkovskiy_, May 09 2019
%p A144369 k:= 5: 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..60);
%Y A144369 5th column of A144374. Cf. A000005.
%K A144369 eigen,nonn
%O A144369 1,7
%A A144369 _Alois P. Heinz_, Sep 18 2008