OFFSET
0,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (12,-33).
FORMULA
From Philippe Deléham, Nov 19 2008: (Start)
a(n) = 12*a(n-1) - 33*a(n-2) for n > 1, with a(0)=1, a(1)=6.
G.f.: (1-6x)/(1-12x+33x^2).
a(n) = (Sum_{k=0..n} A098158(n,k)*6^(2k)*3^(n-k))/6^n. (End)
EXAMPLE
a(3)=270
MATHEMATICA
CoefficientList[Series[(1-6x)/(1-12x+33x^2), {x, 0, 30}], x] (* or *) LinearRecurrence[{12, -33}, {1, 6}, 30] (* Harvey P. Dale, Jul 30 2021 *)
PROG
(Magma) Z<x>:= PolynomialRing(Integers()); N<r3>:=NumberField(x^2-3); S:=[ ((6+r3)^n+(6-r3)^n)/2: n in [0..19] ]; [ Integers()!S[j]: j in [1..#S] ]; // Klaus Brockhaus, Nov 19 2008
CROSSREFS
KEYWORD
nonn
AUTHOR
Al Hakanson (hawkuu(AT)gmail.com), Nov 17 2008
EXTENSIONS
Extended beyond a(6) by Klaus Brockhaus, Nov 19 2008
STATUS
approved