|
| |
|
|
A159348
|
|
Transform of the finite sequence (1, 0, -1, 0, 1) by the T_{0,0} transform (see link)
|
|
2
| |
|
|
1, 1, 1, 4, 11, 24, 55, 128, 298, 693, 1611, 3745, 8706, 20239, 47050, 109378, 254273, 591113, 1374171, 3194560, 7426451, 17264404, 40134870, 93302253, 216901423, 504234633, 1172203306, 2725042075, 6334954246, 14726981894, 34236079265
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,4
|
|
|
LINKS
| Richard Choulet : Curtz-like transformation
|
|
|
FORMULA
| O.g.f f(z)=((1-z)^2/(1-3*z+2*z^2-z^3))*(1-z^2+z^4).
|
|
|
EXAMPLE
| a(0)=1, a(1)=1, a(2)=1, a(3)=4, a(4)=11, a(5)=24, a(6)=55 and for n>=4 a(n+3)=3*a(n+2)-2*a(n+1)+a(n)
|
|
|
MAPLE
| a(0):=1: a(1):=1:a(2):=1: a(3):=4:a(4):=11:a(5):=24:a(6):=55:for n from 4 to 31 do a(n+3):=3*a(n+2)-2*a(n+1)+a(n):od:seq(a(i), i=0..31);
|
|
|
MATHEMATICA
| Join[{1, 1, 1, 4}, LinearRecurrence[{3, -2, 1}, {11, 24, 55}, 40]] (* or *) CoefficientList[Series[(-1+2 x-2 x^3+2 x^5-x^6)/(-1+3 x-2 x^2+x^3), {x, 0, 45}], x](* From Harvey P. Dale, Oct 04 2011 *)
|
|
|
CROSSREFS
| A137531, A159347
Sequence in context: A143075 A007678 A159350 * A159349 A192597 A176959
Adjacent sequences: A159345 A159346 A159347 * A159349 A159350 A159351
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Richard Choulet (richardchoulet(AT)yahoo.fr), Apr 11 2009
|
| |
|
|
