A125899 Floor((Pentanacci ratio)^n).

1, 3, 7, 14, 29, 57, 113, 223, 438, 862, 1695, 3333, 6552, 12882, 25326, 49791, 97887, 192440, 378328, 743774, 1462223, 2874655, 5651422, 11110404, 21842481, 42941187, 84420150, 165965646, 326279870, 641449337, 1261056193, 2479171198

Offset

1,2

Links

Table of n, a(n) for n=1..32.

Example

The Pentanacci ratio is A103814, a root of the polynomial x^5-x^4-x^3-x^2-x-1.

Mathematica

Table[Floor[(Root[ -1 - #1 - #1^2 - #1^3 - #1^4 + #1^5 &, 1])^n], {n, 1, 100}] (* Artur Jasinski *)

Crossrefs

Cf. A125890-A125899.

Sequence in context: A151754 A192065 A157672 * A266791 A052997 A267210

Adjacent sequences: A125896 A125897 A125898 * A125900 A125901 A125902

Keyword

nonn

Author

Artur Jasinski, Dec 13 2006

Extensions

Reference to A103814 added - R. J. Mathar, Sep 26 2010

Status

approved