A014052 a(n) = floor((n+1/n)^n).

2, 6, 37, 326, 3802, 54992, 948645, 18992710, 432655358, 11046221254, 312347907386, 9688154906657, 327018557066164, 11932588574197763, 468012768020438830, 19634066192684343922, 877272066059957914873, 41590621075366029857195, 2085184183314142201403129

Offset: 1

Author

N. J. A. Sloane, Jun 14 1998

Keywords

• nonn
• easy

Links

• Vincenzo Librandi, Table of n, a(n) for n = 1..300

Crossrefs

Cf. A014056, A014058.

Programs

Magma

[Floor((n+1/n)^n): n in [1..20]]; // Vincenzo Librandi, Oct 17 2011

Maple

A014052:=n->floor((n+1/n)^n): seq(A014052(n), n=1..20); # Wesley Ivan Hurt, Aug 15 2016

Mathematica

Table[Floor[(n+1/n)^n], {n, 20}] (* Wesley Ivan Hurt, Aug 15 2016 *)

PARI

a(n)=(n+1/n)^n\1 \\ Charles R Greathouse IV, Apr 17 2012

SageMath

[int((n+1/n)^n) for n in range(1,51)] # G. C. Greubel, Feb 05 2024