|
|
A144321
|
|
Shifts left when Dirichlet convolution (DC:(b,b)->a) applied 7 times.
|
|
2
|
|
|
1, 1, 128, 16384, 2105280, 269475840, 34494988288, 4415358500864, 565166154790272, 72341267946323968, 9259682331352899584, 1185239338413171146752, 151710635321300728430592, 19418961321126493239115776, 2485627049104751885136429056
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
LINKS
|
|
|
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);
|
|
CROSSREFS
|
|
|
KEYWORD
|
eigen,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|