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 A242883 #17 Sep 08 2022 08:46:08 %S A242883 1,3,5,6,7,9,15,18,21,24,27,33,39,51,58,60,63,69,75,81,87,99,105,111, %T A242883 123,135,153,165,171,183,186,207,213,219,231,243,249,255,267,279,309, %U A242883 315,351,363,375,387,393,399,423,435,453,465,471,495,501,531,543,579,603,615,627 %N A242883 Numbers n such that (n^n+3^3)/(n+3) is an integer. %H A242883 Paolo P. Lava, <a href="/A242883/b242883.txt">Table of n, a(n) for n = 1..500</a> %e A242883 (5^5+3^3)/(5+3) = 3152/8 = 394 is an integer. Thus 5 is a member of this sequence. %p A242883 A242883:=n->`if`((n^n+27) mod (n+3) = 0, n, NULL): seq(A242883(n), n=1..1000); # _Wesley Ivan Hurt_, Jan 10 2017 %t A242883 t[n_Integer]:=Select[Range[n], Divisible[#^# + 27, # + 3] &]; t[700] (* _Vincenzo Librandi_, Apr 21 2015 *) %o A242883 (PARI) for(n=1,1000,s=(n^n+3^3)/(n+3);if(floor(s)==s,print1(n, ", "))) %o A242883 (Magma) [n: n in [1..700] | Denominator((n^n+3^3)/(n+3))eq 1]; // _Vincenzo Librandi_, Apr 21 2015 %Y A242883 Cf. A242875. %K A242883 nonn %O A242883 1,2 %A A242883 _Derek Orr_, May 25 2014