%I #11 Sep 08 2022 08:45:12
%S 1,3,17,130,1333,17157,266305,4842756,101010101,2377597255,
%T 62350352785,1802828015430,56984650387477,1954883439200265,
%U 72340172838076673,2872362020438669320,121815504877079063701,5495610154611982192011,262801002506265664160401
%N a(n) = floor((n+2)^(n+2)/((n+2)^2-1)).
%H G. C. Greubel, <a href="/A089815/b089815.txt">Table of n, a(n) for n = 0..385</a>
%p A089815:=n->floor((n+2)^(n+2)/((n+2)^2-1)): seq(A089815(n), n=0..30); # _Wesley Ivan Hurt_, Apr 11 2017
%t Table[Floor[(n + 2)^(n + 2)/((n + 2)^2 - 1)], {n, 0, 50}] (* _G. C. Greubel_, Oct 10 2017 *)
%o (PARI) for(n=0,50, print1(floor((n+2)^(n+2)/((n+2)^2-1)), ", ")) \\ _G. C. Greubel_, Oct 10 2017
%o (Magma) [Floor((n+2)^(n+2)/((n+2)^2-1)): n in [0..50]]; // _G. C. Greubel_, Oct 10 2017
%Y Cf. A000975, A033113-A033119, A059848, A062864, A056830.
%K nonn
%O 0,2
%A _Paul Barry_, Nov 12 2003