|
|
A253972
|
|
Primes p such that p + nextprime(p) is divisible by 8.
|
|
1
|
|
|
3, 11, 53, 59, 61, 71, 73, 107, 113, 139, 157, 173, 179, 191, 227, 233, 239, 257, 283, 293, 311, 317, 347, 353, 373, 419, 431, 433, 523, 541, 547, 557, 593, 599, 601, 631, 653, 659, 677, 691, 733, 773, 787, 811, 827, 919, 941, 953, 977, 1013, 1019, 1031, 1033
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
p=59 is in this sequence because 59+61 = 120 is divisible by 8.
|
|
MATHEMATICA
|
Prime@Select[Range[300], Mod[Prime[#] + Prime[# + 1], 8]==0 &]
|
|
PROG
|
(Magma) [p: p in PrimesUpTo(1500) | (p+NextPrime(p)) mod 8 eq 0];
(PARI) forprime(p=1, 10^3, if(!((p+nextprime(p+1))%8), print1(p, ", "))) \\ Derek Orr, Jan 30 2015
|
|
CROSSREFS
|
Cf. similar sequences listed in A253969.
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|