OFFSET
1,1
COMMENTS
Same as A025192 for n > 1. - Georg Fischer, Oct 21 2018
LINKS
G. C. Greubel, Table of n, a(n) for n = 1..1000
Index entries for linear recurrences with constant coefficients, signature (3).
FORMULA
a(n) = A008776(n-1) for n>1. - R. J. Mathar, Apr 24 2007
G.f.: 3*x + 6*x^2/(1-3*x). - R. J. Mathar, Nov 18 2007
MATHEMATICA
Rest[CoefficientList[Series[3 x + 6 x^2/(1 - 3 x), {x, 0, 50}], x]] (* G. C. Greubel, Sep 01 2017 *)
Join[{3}, NestList[3#&, 6, 30]] (* Harvey P. Dale, Aug 14 2024 *)
PROG
(PARI) x='x+O('x^50); Vec(3*x + 6*x^2/(1-3*x)) \\ G. C. Greubel, Sep 01 2017
CROSSREFS
KEYWORD
easy,less,nonn
AUTHOR
Jonathan Vos Post, Jul 29 2005
STATUS
approved