|
| |
|
|
A144036
|
|
Shifts left when Euler transform applied 4 times.
|
|
1
|
|
|
|
0, 1, 1, 5, 19, 89, 410, 2052, 10440, 54874, 293549, 1597621, 8807766, 49107289, 276358791, 1567866228, 8957204966, 51486464912, 297548288251, 1727856600935, 10076859047404, 58996263573440, 346614270372761, 2042929868812385
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,4
|
|
|
LINKS
|
Table of n, a(n) for n=0..23.
N. J. A. Sloane, Transforms
|
|
|
MAPLE
|
k:=4: with (numtheory): etr:= proc(p) local b; b:=proc(n) option remember; local d, j; if n=0 then 1 else add (add (d*p(d), d=divisors(j)) *b(n-j), j=1..n)/n fi end end: a:='a': b[1]:=etr(a): for t from 2 to k do b[t]:= etr(b[t-1]) od: a:= n-> `if`(n<2, n, b[k](n-1)): seq (a(n), n=0..30);
|
|
|
CROSSREFS
|
4th column of A144042.
Sequence in context: A149802 A149803 A149804 * A110210 A147139 A149805
Adjacent sequences: A144033 A144034 A144035 * A144037 A144038 A144039
|
|
|
KEYWORD
|
eigen,nonn
|
|
|
AUTHOR
|
Alois P. Heinz, Sep 07 2008
|
|
|
STATUS
|
approved
|
| |
|
|
