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 A096522 #5 Oct 15 2013 22:32:26
%S A096522 25,27,34,35,45,49,59,62,65,97,99,103,106,113,120,139,142,169,176,181,
%T A096522 183,185,186,208,215,216,223,227,232,237,256,259,267,269,293,298,302,
%U A096522 309,332,333,334,340,349,358,361,362,364,371,373,381,387,403,426,433
%N A096522 Solutions to A096520[x]=0, that is in neighborhood with c=2^x center and r=Ceiling[Log[2^x]] no prime occurs.
%t A096522 {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[Equal[s, 0], Print[{n, s}];ta[[u]]=n;u=u+1], {n, 1, 1000}];ta
%Y A096522 Cf. A096509-A096521.
%K A096522 nonn
%O A096522 1,1
%A A096522 _Labos Elemer_, Jul 12 2004