A144321 Shifts left when Dirichlet convolution (DC:(b,b)->a) applied 7 times.
1, 1, 128, 16384, 2105280, 269475840, 34494988288, 4415358500864, 565166154790272, 72341267946323968, 9259682331352899584, 1185239338413171146752, 151710635321300728430592, 19418961321126493239115776, 2485627049104751885136429056
Offset: 1
Links
- Alois P. Heinz, Table of n, a(n) for n = 1..150
- N. J. A. Sloane, Transforms
Crossrefs
7th column of A144324.
Programs
-
Maple
k:=7: with (numtheory): dc:= proc(b,c) proc(n) option remember; add (b(d) *c(n/d), d=`if`(n<0,{}, divisors(n))) end end: a:='a': b[1]:= dc(a,a): for t from 2 to k do b[t]:= dc(b[t-1], b[t-1]) od: a:= n-> `if`(n=1, 1, b[k](n-1)): seq (a(n), n=1..25);