This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A335752 #25 Oct 05 2021 04:50:26 %S A335752 3,5,47,239,3023,27983,53231,118343,198959,452831,580871,9364871, %T A335752 26386463,67876751,662675543,2952903983,22614861263 %N A335752 The lexicographically earliest sequence of primes, each two of which sum to a triprime (A014612). %e A335752 3 + 5 = 8 = 2*2*2, 3 + 47 = 50 = 2*5*5, 5 + 47 = 52 = 2*2*13. %t A335752 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 *) %Y A335752 Cf. A000040, A014612, A113875. %K A335752 nonn,more %O A335752 1,1 %A A335752 _Zak Seidov_, Jul 19 2020 %E A335752 a(17) from _Amiram Eldar_, Jul 22 2020 %E A335752 Name edited by _Jon E. Schoenfield_, Oct 04 2021