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 A090124 #4 Oct 15 2013 22:32:21
%S A090124 5,4,8,16,11727599043051,54980371265625,128,557556054479199010816,
%T A090124 22027845102081762861,162889462677744140625,803596764671634487466709,
%U A090124 14231716419191575233132742871310396257144854491849
%N A090124 a(n) is the least positive n-th power integer such that nextprime[a(n)]-prevprime[a(n)]=q-p-4;.
%e A090124 n=4:a(n)=16,{p=13,16=4^4,q=17}
%t A090124 Table[fla=1;Do[If[((PrimeQ[s=n^k-3]&&PrimeQ[s1=n^k+1]) ||(PrimeQ[s=n^k-2]&&PrimeQ[s1=n^k+2])||(PrimeQ[s=n^k-1] &&PrimeQ[s1=n^k+3]))&&Equal[fla, 1]&&!Equal[n, 1], Print[n^k];fla=0], {n, 1, 1000000}], {k, 1, 60}]
%Y A090124 Cf. A090121-A090125.
%K A090124 nonn
%O A090124 1,1
%A A090124 _Labos Elemer_, Jan 12 2004