A218736 a(n) = (33^n - 1)/32.

0, 1, 34, 1123, 37060, 1222981, 40358374, 1331826343, 43950269320, 1450358887561, 47861843289514, 1579440828553963, 52121547342280780, 1720011062295265741, 56760365055743769454, 1873092046839544391983, 61812037545704964935440, 2039797239008263842869521

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 related to partial sums.

Index entries related to q-numbers.

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

Cf. similar sequences of the form (k^n-1)/(k-1): A000225, A003462, A002450, A003463, A003464, A023000, A023001, A002452, A002275, A016123, A016125, A091030, A135519, A135518, A131865, A091045, A218721, A218722, A064108, A218724-A218734, A132469, A218737-A218753, A133853, A094028, A218723.

Sequence in context: A170667 A170715 A170753 * A248163 A158696 A029547

Adjacent sequences: A218733 A218734 A218735 * A218737 A218738 A218739

Keyword

nonn,easy

Author

M. F. Hasler, Nov 04 2012

Status

approved