OFFSET
0,2
LINKS
Paolo Xausa, Table of n, a(n) for n = 0..970
Index entries for linear recurrences with constant coefficients, signature (18,-78).
FORMULA
From Philippe Deléham, Nov 26 2008: (Start)
a(n) = 18*a(n-1) - 78*a(n-2), n > 1; a(0)=1, a(1)=9.
G.f.: (1-9*x)/(1-18*x+78*x^2).
a(n) = (Sum_{k=0..n} A098158(n,k)*3^(3*k))/3^n. (End)
MATHEMATICA
LinearRecurrence[{18, -78}, {1, 9}, 25] (* Paolo Xausa, Jun 04 2026 *)
PROG
(Magma) Z<x>:= PolynomialRing(Integers()); N<r3>:=NumberField(x^2-3); S:=[ ((9+r3)^n+(9-r3)^n)/2: n in [0..19] ]; [ Integers()!S[j]: j in [1..#S] ]; // Klaus Brockhaus, Nov 26 2008
(PARI) a(n)=([0, 1; -78, 18]^n*[1; 9])[1, 1] \\ Charles R Greathouse IV, Jun 04 2026
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Al Hakanson (hawkuu(AT)gmail.com), Nov 22 2008
EXTENSIONS
Extended beyond a(6) by Klaus Brockhaus, Nov 26 2008
More terms from Paolo Xausa, Jun 04 2026
STATUS
approved
