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

1, 0, 1, 6, 51, 520, 6665, 102942, 1864135, 38742048, 909090909, 23775972550, 685853880635, 21633936185160, 740800455037201, 27368368148803710, 1085102592571150095, 45957792327018709120, 2070863582910344082917, 98920982783015679456198

Offset: 0

Author

Alex Ratushnyak, Aug 04 2012

Keywords

• nonn
• easy

Comments

b(n) = n^n mod (n+1) begins: 0, 1, 1, 3, 1, 5, 1, 7, 1, 9, 1, 11, 1, 13, 1, 15...

Links

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

Crossrefs

Cf. A060072 is essentially floor((n+1)^n / n).

Cf. A173499 is equal to floor((n-1)^n / n).

Cf. A023037 is essentially floor((n+1)^(n+1) / n).

Programs

Magma

[Floor(n^n/(n+1)): n in [0..30]]; // G. C. Greubel, Aug 16 2022

Mathematica

Table[If[n==0, 1, Floor[n^n/(n+1)]], {n,0,30}] (* G. C. Greubel, Aug 16 2022 *)

Python

for n in range(55):
    print(n**n // (n+1), end=",")

SageMath

[(n^n//(n+1)) for n in (0..30)] # G. C. Greubel, Aug 16 2022