A014516 Nearest integer to Gamma(n + 1/3).

3, 1, 1, 3, 9, 40, 214, 1355, 9940, 82834, 773118, 7988888, 90540730, 1116669003, 14888920041, 213407853923, 3272253760147, 53446811415729, 926411397872639, 16984208960998390, 328361373245968868, 6676681256001366975, 142435866794695828799, 3181067691748206843170, 74224912807458159673978

Offset

0,1

References

M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, Tenth Printing, 1972, p. 255.

Links

Robert Israel, Table of n, a(n) for n = 0..450

M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards, Applied Math. Series 55, Tenth Printing, 1972 [alternative scanned copy].

M. Abramowitz and I. A. Stegun, eds., Handbook of Mathematical Functions, National Bureau of Standards Applied Math. Series 55, Tenth Printing, 1972, p. 255.

Maple

[ seq(round(evalf(GAMMA(n+1/3), 100)), n=0..24) ];

Mathematica

a[n_] := Round[Gamma[n + 1/3]]; Array[a, 25, 0] (* Amiram Eldar, Sep 20 2019 *)

Prog

(PARI) a(n) = round(gamma(n+1/3)); \\ Michel Marcus, Sep 13 2018

Crossrefs

Cf. A014510, A014511, A014512, A014513, A014514, A014517, A014518, A014521, A014522.

Sequence in context: A088749 A024737 A024958 * A247306 A016563 A025254

Adjacent sequences: A014513 A014514 A014515 * A014517 A014518 A014519

Keyword

nonn

Author

N. J. A. Sloane

Extensions

Corrected and extended by Robert Israel, Sep 12 2018

Status

approved