login
A255897
Primes equal to the sum of both two and three successive semiprimes.
1
19, 73, 233, 719, 839, 2287, 2593, 5927, 6551, 6833, 6991, 7129, 10639, 11593, 15551, 18049, 20347, 20719, 20749, 22073, 23117, 25111, 26633, 27967, 28607, 30161, 31729, 32969, 38449, 39761, 40361, 41479, 42359, 45083, 47287
OFFSET
1,1
COMMENTS
Intersection of A108183 and A255889.
EXAMPLE
19=9+10=4+6+9, 73=35+38=22+25+26.
MATHEMATICA
Module[{nn=25000, sp, c2, c3}, sp=Select[Range[nn], PrimeOmega[#]==2&]; c2= Select[ Total/@Partition[sp, 2, 1], PrimeQ]; c3=Select[Total/@Partition[ sp, 3, 1], PrimeQ]; Intersection[c2, c3]] (* Harvey P. Dale, Sep 21 2019 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Zak Seidov, Mar 09 2015
EXTENSIONS
Definition clarified by Harvey P. Dale, Sep 21 2019
STATUS
approved