|
|
A162337
|
|
Primes p such that floor(p/3) is prime.
|
|
1
|
|
|
7, 11, 17, 23, 41, 53, 59, 71, 89, 113, 131, 179, 239, 251, 269, 293, 311, 383, 419, 449, 491, 503, 521, 593, 599, 683, 701, 719, 773, 809, 881, 941, 953, 1013, 1049, 1061, 1103, 1151, 1193, 1229, 1259, 1301, 1319, 1373, 1439, 1499, 1511, 1571, 1709, 1733
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
7 is in the sequence since floor(7/3) = 2 is prime; 89 is in the sequence since floor(89/3) = 29 is prime.
|
|
MATHEMATICA
|
lst={}; Do[r=Prime[n]; If[PrimeQ[p=Floor[r/3]], AppendTo[lst, r]], {n, 6!}]; lst
|
|
PROG
|
(Magma) [ p: p in PrimesUpTo(1800) | IsPrime(p div 3) ]; // Klaus Brockhaus, Jul 06 2009
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|