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 A333184 #17 Mar 13 2020 06:15:53 %S A333184 0,1,2,-4,0,-1,-20,0,7,-10,-8,-2,-5,12,23,-28,-21,-8,-20,-15,-32,53, %T A333184 -30,-47,10,-29,-48,33,-6,8,20,71,-5,-15,-6,3,109,23,-50,41,57,172, %U A333184 -170,1,-122,-237,161,-8,91,-112,67,253,38,75,343,-188,43,88,123,96 %N A333184 a(n) = n^n - (PrevPrime(n^n) + NextPrime(n^n)) / 2. %H A333184 Hugo Pfoertner, <a href="/A333184/b333184.txt">Table of n, a(n) for n = 2..1000</a> %e A333184 n Previous P n^n Next P a(n) %e A333184 A098681(n) A000312(n) A098682(n) %e A333184 2 3 4 5 0 %e A333184 3 23 27 29 1 %e A333184 4 251 256 257 2 %e A333184 5 3121 3125 3137 -4 %e A333184 6 46649 46656 46663 0 %e A333184 7 823541 823543 823547 -1 %e A333184 8 16777213 16777216 16777259 -20 %e A333184 9 387420479 387420489 387420499 0 %e A333184 10 9999999967 10000000000 10000000019 7 %p A333184 a:= n-> (m-> m-(prevprime(m)+nextprime(m))/2)(n^n): %p A333184 seq(a(n), n=2..65); # _Alois P. Heinz_, Mar 10 2020 %o A333184 (PARI) for(n=2,61, my(f=n^n); print1(f-(precprime(f)+nextprime(f))/2,", ")) %Y A333184 Cf. A000312, A074966, A074967, A098681, A098682, A161503. %Y A333184 Cf. A333185 (position of terms = 0). %K A333184 sign %O A333184 2,3 %A A333184 _Hugo Pfoertner_, Mar 10 2020