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 A127798 #6 Nov 21 2013 12:49:02 %S A127798 1,1,5,5,7,7,7,25,5,31,49,31,35,25,23,11,17,29,47,103,7,5,7,23,133,19, %T A127798 5,13,7,215,89,5,53,89,17,35,257,29,19,193,13,121,79,71,53,61,287,61, %U A127798 107,125,5,203,23,119,89,5,95,61,7,29,191,211,119,31,377,37,49,89,161,5,785 %N A127798 Nextprime(12^n)-12^n. %t A127798 << NumberTheory`NumberTheoryFunctions` a = {}; Do[k = NextPrime[12^x] - 12^x; AppendTo[a, k], {x, 0, 100}]; a %t A127798 f[n_]:=Module[{c=12^n},NextPrime[c]-c]; f/@Range[0,100] (* _Harvey P. Dale_, Mar 19 2011 *) %Y A127798 Cf. A013597, A013598, A013602, A013599, A013600, A013601, A127796, A033873, A127795, A127796, A127797, A127799. %K A127798 nonn %O A127798 0,3 %A A127798 _Artur Jasinski_, Jan 29 2007