|
Search: id:A122056
|
|
|
| A122056 |
|
A Somos 9 -Hone exponent type recursion:a(n) = (x^(n-1)*a(n - 1)a(n - 8) - a(n - 4)*a(n - 5))/a(n - 9). |
|
+0
1
|
|
| 0, 0, 1, 3, 6, 10, 15, 21, 28, 36, 46, 58, 72, 88, 106, 126, 148, 172, 199, 229, 262, 298, 337, 379, 424, 472, 524, 580, 640, 704, 772
(list; graph; listen)
|
|
|
OFFSET
|
1,4
|
|
|
REFERENCES
|
A. N. W. Hone, Algebraic curves, integer sequences and a discrete Painleve transcendent, Proceedings of SIDE 6, Helsinki, Finland, Jun 19 2004. [Set a(n)=d(n+3) on p. 8] http://www.kent.ac.uk/ims/publications/documents/paper_607.pdf
|
|
FORMULA
|
p[n]=(x^(n - 1)p[n - 1]p[n - 8] + p[n - 4]*p[n - 5])/p[n - 9] a(n) = Exponent[p[n], x]
|
|
MATHEMATICA
|
p[n_] := p[n] = Cancel[Simplify[(x^(n - 1)p[n - 1]p[n - 8] + p[n - 4]*p[n - 5])/p[n - 9]]]; p[ -9] = 1; p[ -8] = 1; p[ -7] = 1; p[ -6] = 1; p[ -5] = 1; p[ -4] = 1; p[ -3] = 1; p[ -2] = 1; p[ -1] = 1; Table[Exponent[p[n], x], {n, 0, 30}]
|
|
CROSSREFS
|
Cf. A006731, A014125.
Sequence in context: A069792 A025737 A120721 this_sequence A025706 A025730 A066353
Adjacent sequences: A122053 A122054 A122055 this_sequence A122057 A122058 A122059
|
|
KEYWORD
|
nonn,uned
|
|
AUTHOR
|
Roger Bagula (rlbagulatftn(AT)yahoo.com), Sep 13 2006
|
|
|
Search completed in 0.002 seconds
|
