A089815 a(n) = floor((n+2)^(n+2)/((n+2)^2-1)).

1, 3, 17, 130, 1333, 17157, 266305, 4842756, 101010101, 2377597255, 62350352785, 1802828015430, 56984650387477, 1954883439200265, 72340172838076673, 2872362020438669320, 121815504877079063701, 5495610154611982192011, 262801002506265664160401

Offset: 0

Author

Paul Barry, Nov 12 2003

Keywords

• nonn

Links

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

Crossrefs

Cf. A000975, A033113-A033119, A059848, A062864, A056830.

Programs

Magma

[Floor((n+2)^(n+2)/((n+2)^2-1)): n in [0..50]]; // G. C. Greubel, Oct 10 2017

Maple

A089815:=n->floor((n+2)^(n+2)/((n+2)^2-1)): seq(A089815(n), n=0..30); # Wesley Ivan Hurt, Apr 11 2017

Mathematica

Table[Floor[(n + 2)^(n + 2)/((n + 2)^2 - 1)], {n, 0, 50}] (* G. C. Greubel, Oct 10 2017 *)

PARI

for(n=0,50, print1(floor((n+2)^(n+2)/((n+2)^2-1)), ", ")) \\ G. C. Greubel, Oct 10 2017