%I #7 Jul 03 2023 07:59:47
%S 1,1,1,3,3,11,9,7,73,59,181,483,657,1871,3729,7027,16813,32699,68761,
%T 149463,301017,642731,1349349,2790547,5912353,12327839,25777441,
%U 54217443,113194077,237322091,497475369,1040614567,2181561193
%N a(n) = 2*a(n-2)+5*a(n-3), n>6.
%H <a href="/index/Rec#order_03">Index entries for linear recurrences with constant coefficients</a>, signature (0, 2, 5).
%F G.f.: 6*x^4+2*x+(x^2+x-1)/(-1+2*x^2+5*x^3). [Sep 28 2009]
%t F[1] = 1; F[2] = 1; F[3] = 1; F[n__] := F[n] = 2*F[n - 2] - 5*F[n - 3] b = Table[Abs[F[n]], {n, 1, 50}]
%t LinearRecurrence[{0,2,5},{1,1,1,3,3,11,9,7},40] (* _Harvey P. Dale_, Jun 10 2019 *)
%Y Cf. A007493.
%K nonn,easy
%O 0,4
%A _Roger L. Bagula_, Jun 08 2005
%E Definition replaced by recurrence by the Associate Editors of the OEIS, Sep 28 2009
|