|
|
A102901
|
|
a(n) = a(n-1) + 6*a(n-2), a(0)=1, a(1)=0.
|
|
7
|
|
|
1, 0, 6, 6, 42, 78, 330, 798, 2778, 7566, 24234, 69630, 215034, 632814, 1923018, 5719902, 17258010, 51577422, 155125482, 464590014, 1395342906, 4182882990, 12554940426, 37652238366, 112981880922, 338895311118, 1016786596650
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
COMMENTS
|
Hankel transform is = 1,6,0,0,0,0,0,0,0,0,0,0,... - Philippe Deléham, Nov 02 2008
|
|
REFERENCES
|
Maria Paola Bonacina and Nachum Dershowitz, Canonical Inference for Implicational Systems, in Automated Reasoning, Lecture Notes in Computer Science, Volume 5195/2008, Springer-Verlag.
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1-x)/((1+2*x)*(1-3*x)).
a(n) = (2*3^n + 3*(-2)^n)/5.
|
|
EXAMPLE
|
a(6) = 330; (2*3^6 + 3*(-2)^6)/5 = (1458 + 192)/5 = 330.
|
|
MAPLE
|
|
|
MATHEMATICA
|
CoefficientList[Series[(1-x)/((1+2x)(1-3x)), {x, 0, 50}], x] (* Vincenzo Librandi, Jul 20 2013 *)
|
|
PROG
|
(SageMath)
A102901=BinaryRecurrenceSequence(1, 6, 1, 0)
|
|
CROSSREFS
|
|
|
KEYWORD
|
easy,nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|