login
A335752
The lexicographically earliest sequence of primes, each two of which sum to a triprime (A014612).
0
3, 5, 47, 239, 3023, 27983, 53231, 118343, 198959, 452831, 580871, 9364871, 26386463, 67876751, 662675543, 2952903983, 22614861263
OFFSET
1,1
EXAMPLE
3 + 5 = 8 = 2*2*2, 3 + 47 = 50 = 2*5*5, 5 + 47 = 52 = 2*2*13.
MATHEMATICA
ps = {3}; Do[p = NextPrime[ps[[-1]]]; While[! AllTrue[ps + p, PrimeOmega[#] == 3 &], p = NextPrime[p]]; AppendTo[ps, p], {10}]; ps (* Amiram Eldar, Jul 22 2020 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Zak Seidov, Jul 19 2020
EXTENSIONS
a(17) from Amiram Eldar, Jul 22 2020
Name edited by Jon E. Schoenfield, Oct 04 2021
STATUS
approved