|
Search: id:A038071
|
|
|
| A038071 |
|
Shifts left under inverse Euler transform. |
|
+0
1
|
|
| 1, 1, 0, -1, -1, 0, 1, 0, -1, 0, 2, 1, -3, -3, 4, 7, -4, -14, 3, 28, 4, -53, -30, 91, 95, -142, -240, 191, 556, -165, -1192, -140, 2358, 1215, -4322, -4194, 7211, 11492, -10300, -27839, 10194, 61770, 3506, -127099, -58080, 242071, 218346, -419278
(list; graph; listen)
|
|
|
OFFSET
|
1,11
|
|
|
LINKS
|
N. J. A. Sloane, Transforms
|
|
MAPLE
|
with(numtheory): ietr:= proc(p) local a, c; c:= proc(n) option remember; local j; n*p(n)-add(c(j)*p(n-j), j=1..n-1) end; a:=proc(n) option remember; local d; `if`(n=0, 1, add (mobius (n/d)*c(d), d=divisors(n))/n) end end: aa := ietr('a'): a:= n->`if`(n<=1, 1, aa(n-1)): seq (a(n), n=1..48); [From Alois P. Heinz (heinz(AT)hs-heilbronn.de), Sep 08 2008]
|
|
CROSSREFS
|
Sequence in context: A007307 A141576 A078019 this_sequence A032140 A032044 A158974
Adjacent sequences: A038068 A038069 A038070 this_sequence A038072 A038073 A038074
|
|
KEYWORD
|
sign,eigen
|
|
AUTHOR
|
Christian G. Bower (bowerc(AT)usa.net), Jan 04 1999.
|
|
|
Search completed in 0.002 seconds
|
