0,1

First in the suitable neighborhood of 2^25 no primes occur: a[0]=25, while corresponding around 2^127 6 primes arise: a[6]=127.

t=Table[Count[Table[PrimeQ[2^n+i], {i, -Ceiling[Log[2^n]//N], Ceiling[Log[2^n]//N]}], True], {n, 1, 256}] Table[Min[Flatten[Position[t, j]]], {j, 0, 10}]

Cf. A096509-A096523.

Sequence in context: A080203 A040605 A065910 this_sequence A040604 A097440 A040603

Adjacent sequences: A096518 A096519 A096520 this_sequence A096522 A096523 A096524

nonn

Labos E. (labos(AT)ana.sote.hu), Jul 12 2004