OFFSET
1,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 1..300
MATHEMATICA
Table[Round[(n+1/n)^n], {n, 50}] (* G. C. Greubel, Feb 05 2024 *)
PROG
(Magma) [Round((n+1/n)^n): n in [1..20]]; // Vincenzo Librandi, Oct 20 2011
(PARI) a(n)=round((n+1/n)^n) \\ Charles R Greathouse IV, Jul 01 2013
(SageMath) [round((n+1/n)^n) for n in range(1, 51)] # G. C. Greubel, Feb 05 2024
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved