|
| |
|
|
A096522
|
|
Solutions to A096520[x]=0, that is in neighborhood with c=2^x center and r=Ceiling[Log[2^x]] no prime occurs.
|
|
1
| |
|
|
25, 27, 34, 35, 45, 49, 59, 62, 65, 97, 99, 103, 106, 113, 120, 139, 142, 169, 176, 181, 183, 185, 186, 208, 215, 216, 223, 227, 232, 237, 256, 259, 267, 269, 293, 298, 302, 309, 332, 333, 334, 340, 349, 358, 361, 362, 364, 371, 373, 381, 387, 403, 426, 433
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,1
|
|
|
MATHEMATICA
| {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
|
|
|
CROSSREFS
| Cf. A096509-A096521.
Sequence in context: A070662 A183982 A129820 * A195351 A015734 A083806
Adjacent sequences: A096519 A096520 A096521 * A096523 A096524 A096525
|
|
|
KEYWORD
| nonn
|
|
|
AUTHOR
| Labos E. (labos(AT)ana.sote.hu), Jul 12 2004
|
| |
|
|
