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 A102630 #6 Mar 14 2015 16:50:55
%S A102630 1,2,31,35,54,67,68,74,97,109,126,134,140,151,155,165,168,171,181,205,
%T A102630 244,251,256,260,274,275,276,285,298,328,330,341,352,368,376,389,405,
%U A102630 413,417,421,430,444,447,450,451,463,471,481,495,509,510,516,522,526
%N A102630 Numbers n such that no positive number of the form prime(n)-2^k is prime.
%C A102630 Large primes tested by Primo.
%H A102630 Lei Zhou, <a href="http://www.bme.emory.edu/~lzhou/prime/">Between 2^n and primes</a>.
%e A102630 Prime(1)=2, 2-2^0=1, not prime.
%e A102630 Prime(31)=127, 127-2^0 through 127-2^6 are nonprime.
%t A102630 fQ[n_] := Block[{k = Floor[ Log[2, Prime[n]]], p = Prime[n]}, While[k > -1 && !PrimeQ[p - 2^k], k-- ]; If[k > 0, True, False]]; Select[ Range[ 536], !fQ[ # ] &] (* _Robert G. Wilson v_, Jan 24 2005 *)
%Y A102630 Cf. A094076, A102631-A102633.
%K A102630 nonn
%O A102630 1,2
%A A102630 _Lei Zhou_, Jan 20 2005
%E A102630 More terms from _Robert G. Wilson v_, Jan 24 2005