login
Floor((Pentanacci ratio)^n).
8

%I #9 Dec 29 2023 11:50:45

%S 1,3,7,14,29,57,113,223,438,862,1695,3333,6552,12882,25326,49791,

%T 97887,192440,378328,743774,1462223,2874655,5651422,11110404,21842481,

%U 42941187,84420150,165965646,326279870,641449337,1261056193,2479171198

%N Floor((Pentanacci ratio)^n).

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

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

%Y Cf. A125890-A125899.

%K nonn

%O 1,2

%A _Artur Jasinski_, Dec 13 2006

%E Reference to A103814 added - _R. J. Mathar_, Sep 26 2010