OFFSET
0,3
COMMENTS
Partial sums of powers of 33 (A009977).
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..600
Index entries for linear recurrences with constant coefficients, signature (34,-33).
FORMULA
From Vincenzo Librandi, Nov 07 2012: (Start)
G.f.: x/((1 - x)*(1 - 33*x)).
a(n) = 34*a(n-1) - 33*a(n-2).
a(n) = floor(33^n/32). (End)
E.g.f.: exp(x)*(exp(32*x) - 1)/32. - Stefano Spezia, Mar 24 2023
MATHEMATICA
LinearRecurrence[{34, -33}, {0, 1}, 30] (* Vincenzo Librandi, Nov 07 2012 *)
PROG
(PARI) A218736(n)=33^n>>5
(Magma) [n le 2 select n-1 else 34*Self(n-1)-33*Self(n-2): n in [1..20]]; // Vincenzo Librandi, Nov 07 2012
(Maxima) A218736(n):=(33^n-1)/32$
makelist(A218736(n), n, 0, 30); /* Martin Ettl, Nov 05 2012 */
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
M. F. Hasler, Nov 04 2012
STATUS
approved