A093322 Tetranacci numbers starting with first four cubes.

1, 8, 27, 64, 100, 199, 390, 753, 1442, 2784, 5369, 10348, 19943, 38444, 74104, 142839, 275330, 530717, 1022990, 1971876, 3800913, 7326496, 14122275, 27221560, 52471244, 101141575, 194956654, 375791033, 724360506, 1396249768, 2691357961

Offset

1,2

Links

Harvey P. Dale, Table of n, a(n) for n = 1..1000

Index entries for linear recurrences with constant coefficients, signature (1,1,1,1).

Formula

a(n) = a(n-1) + a(n-2) + a(n-3) + a(n-4).

G.f.: x*(1 + 7*x + 18*x^2 + 28*x^3) / (1 - x - x^2 - x^3 - x^4). - Colin Barker, Jan 28 2020

Mathematica

a[1] = 1; a[2] = 8; a[3] = 27; a[4] = 64; a[n_] := a[n] = a[n - 1] + a[n - 2] + a[n - 3] + a[n - 4]; Table[ a[n], {n, 31}] (* Robert G. Wilson v, May 11 2004 *)
LinearRecurrence[{1, 1, 1, 1}, Range[4]^3, 40] (* Harvey P. Dale, Apr 18 2018 *)

Prog

(PARI) Vec(x*(1 + 7*x + 18*x^2 + 28*x^3) / (1 - x - x^2 - x^3 - x^4) + O(x^35)) \\ Colin Barker, Jan 28 2020

Crossrefs

Cf. A086213.

Sequence in context: A151675 A211641 A062686 * A017670 A353621 A126200

Adjacent sequences: A093319 A093320 A093321 * A093323 A093324 A093325

Keyword

nonn,easy

Author

Jun Mizuki (suzuki32(AT)sanken.osaka-u.ac.jp), May 11 2004

Extensions

More terms from Robert G. Wilson v and Labos Elemer, May 11 2004

Status

approved