This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A089815 #11 Sep 08 2022 08:45:12 %S A089815 1,3,17,130,1333,17157,266305,4842756,101010101,2377597255, %T A089815 62350352785,1802828015430,56984650387477,1954883439200265, %U A089815 72340172838076673,2872362020438669320,121815504877079063701,5495610154611982192011,262801002506265664160401 %N A089815 a(n) = floor((n+2)^(n+2)/((n+2)^2-1)). %H A089815 G. C. Greubel, <a href="/A089815/b089815.txt">Table of n, a(n) for n = 0..385</a> %p A089815 A089815:=n->floor((n+2)^(n+2)/((n+2)^2-1)): seq(A089815(n), n=0..30); # _Wesley Ivan Hurt_, Apr 11 2017 %t A089815 Table[Floor[(n + 2)^(n + 2)/((n + 2)^2 - 1)], {n, 0, 50}] (* _G. C. Greubel_, Oct 10 2017 *) %o A089815 (PARI) for(n=0,50, print1(floor((n+2)^(n+2)/((n+2)^2-1)), ", ")) \\ _G. C. Greubel_, Oct 10 2017 %o A089815 (Magma) [Floor((n+2)^(n+2)/((n+2)^2-1)): n in [0..50]]; // _G. C. Greubel_, Oct 10 2017 %Y A089815 Cf. A000975, A033113-A033119, A059848, A062864, A056830. %K A089815 nonn %O A089815 0,2 %A A089815 _Paul Barry_, Nov 12 2003