|
Search: id:A115341
|
|
|
| A115341 |
|
a(n) = Abs[(2/3)*(-1+(-2)^n)-(2+(-2)^n)*UnitStep[ -1+n]]. |
|
+0
1
|
|
| 2, 4, 0, 8, 8, 24, 40, 88, 168, 344, 680, 1368, 2728, 5464, 10920, 21848, 43688, 87384, 174760, 349528, 699048, 1398104, 2796200, 5592408, 11184808
(list; graph; listen)
|
|
|
OFFSET
|
0,1
|
|
|
COMMENT
|
Inverse toral ztransform of even ratio 2 sum sequence ( correction to the formula line in sign of two)
These sequences were derived to give a period doubling like effect in iteration.
|
|
MATHEMATICA
|
g0[n_] = 2 - Sum[(-1)^(i + 1)/Sqrt[2]^(2*i), {i, 0, n}] f[x_] = ZTransform[g0[n], n, x] g[n_] = InverseZTransform[f[1/x], x, n] a0 = Table[Abs[g[n]], {n, 1, 25}]
|
|
CROSSREFS
|
Sequence in context: A099890 A137511 A011166 this_sequence A101160 A103191 A071607
Adjacent sequences: A115338 A115339 A115340 this_sequence A115342 A115343 A115344
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Mar 06 2006
|
|
|
Search completed in 0.002 seconds
|
