A133756 a(n) = round( 2*Gamma(3 + n/3) + 2^(n/3) ).

5, 7, 10, 14, 21, 33, 52, 85, 144, 248, 438, 791, 1456, 2731, 5213, 10112, 19920, 39819, 80704, 165749, 344758, 725888, 1546398, 3331879, 7257856, 15978098, 35538283, 79834112, 181082105, 414609369, 958004224, 2233339296, 5251710002, 12454043648, 29777842663, 71773351064, 174356586496, 426815713006, 1052675774422

Offset

0,1

Links

G. C. Greubel, Table of n, a(n) for n = 0..1000

Formula

a(n) = round(2*Gamma(f(n) + 3) + 2^f(n)), where f(n) = n/3.

Mathematica

Table[Round[2*Gamma[3+n/3] + 2^(n/3)], {n, 0, 40}] (* modified by G. C. Greubel, Apr 13 2021 *)

Prog

(Magma) [Round(2*Gamma(n/3 + 3) + 2^(n/3)): n in [0..40]]; // G. C. Greubel, Apr 13 2021
(Sage) [round(2*gamma(n/3 + 3) + 2^(n/3)) for n in (0..40)] # G. C. Greubel, Apr 13 2021

Crossrefs

Sequence in context: A091522 A020711 A183044 * A196936 A188196 A048584

Adjacent sequences: A133753 A133754 A133755 * A133757 A133758 A133759

Keyword

nonn

Author

Roger L. Bagula, Jan 01 2008

Extensions

Edited by G. C. Greubel, Apr 13 2021

Status

approved