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 A096523 #5 Oct 15 2013 22:32:26 %S A096523 127,505,573,619,670,714,743,844,963 %N A096523 Solutions to A096520[x]>5, that is in neighborhood with c=2^x center and r=Ceiling[Log[2^x]] more than five[6,7,8,..?] primes occur. %e A096523 For the first few terms, the numbers of primes in the corresponding neighborhood of 2^(a[j]) are 6, 6, 8, 6, 6, 6, 6, 7, 6. %t A096523 {ta=Table[0, {1000}], u=1}; Do[s=Count[Table[PrimeQ[2^n+i], {i, -Ceiling[Log[2^n]//N], Ceiling[Log[2^n]//N]}], True];If[Greater[s, 5], Print[{n, s}];ta[[u]]=n;u=u+1], {n, 1, 1000}];ta %Y A096523 Cf. A096509-A096521. %K A096523 nonn %O A096523 1,1 %A A096523 _Labos Elemer_, Jul 12 2004