|
| |
|
|
A147659
|
|
Expansion of 1/(1-x-x^2-x^10+x^12).
|
|
1
| |
|
|
1, 1, 2, 3, 5, 8, 13, 21, 34, 55, 90, 146, 237, 385, 625, 1015, 1648, 2676, 4345, 7055, 11456, 18602, 30205, 49046, 79639, 129315, 209977, 340953, 553627, 898959, 1459697, 2370203, 3848649, 6249296, 10147379, 16476944, 26754661, 43443243
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 0,3
|
|
|
COMMENTS
| Coefficient expansion of toral of inverse of low ratio (1.6237635378007012) Pisot Polynomial: a(n)=Coefficient_Expansion(1/( 1 - x^2 - x^10 - x^11 + x^12)). [Original definition]
The 1 + x^2 - x^10 - x^11 + x^12, is not Pisot, so x^22 doubling is the limit that sequence of polynomials below the Golden mean ratio.
|
|
|
LINKS
| Vincenzo Librandi, Table of n, a(n) for n = 0..1000
|
|
|
MATHEMATICA
| f[x_] = 1 - x^2 - x^10 - x^11 + x^12; g[x] = ExpandAll[x^12*f[1/x]]; a = Table[SeriesCoefficient[Series[1/g[x], {x, 0, 50}], n], {n, 0, 50}]
|
|
|
CROSSREFS
| Sequence in context: A074317 A077371 A077372 * A005181 A177376 A120659
Adjacent sequences: A147656 A147657 A147658 * A147660 A147661 A147662
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger L. Bagula (rlbagulatftn(AT)yahoo.com), Nov 09 2008
|
| |
|
|
