|
| |
|
|
A122611
|
|
G.f.: 1/(1 - 7 x + 15 x^2 - 6 x^3 - 11 x^4 + 6 x^5 + x^6).
|
|
0
| |
|
|
1, 7, 34, 139, 516, 1802, 6039, 19657, 62634, 196404, 608361, 1866462, 5683236, 17200871, 51807242, 155421557, 464755958, 1386055506, 4124569714, 12251283960, 36334754000, 107624090145, 318444202635, 941387240040
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
REFERENCES
| P. Steinbach, Golden fields: a case for the heptagon, Math. Mag. 70 (1997), no. 1, 22-31.
|
|
|
LINKS
| Index entries for sequences related to linear recurrences with constant coefficients
|
|
|
MATHEMATICA
| b = {1, -7, 15, -6, -11, 6, 1}; p[x_] := Sum[x^(n - 1)*b[[8 - n]], {n, 1, 7}] q[x_] := ExpandAll[x^6*p[1/x]] Table[ SeriesCoefficient[ Series[x/q[x], {x, 0, 30}], n], {n, 0, 30}]
|
|
|
CROSSREFS
| Cf. A066170.
Sequence in context: A036646 A000418 A055852 * A014915 A137747 A094256
Adjacent sequences: A122608 A122609 A122610 * A122612 A122613 A122614
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Roger Bagula and Gary Adamson (rlbagulatftn(AT)yahoo.com), Sep 20 2006
|
|
|
EXTENSIONS
| Edited by N. J. A. Sloane (njas(AT)research.att.com), Sep 21 2006
|
| |
|
|