[seqfan] Re: New (?) sequence of primes

[Allan Wechsler]

Why does a(2) = 7? If a(2) were 3, then Omega(2 + 3) = Omega(5) = 1 < 4, as
desired.

Omega is the number of prime factors counting multiplicity, right? (
https://oeis.org/A001222)

I am getting 2, 3, 5, 7, 11, 19, 23, 29, 13, 17 ....

On Tue, Dec 27, 2022 at 9:54 PM zak seidov via SeqFan <seqfan at list.seqfan.eu>
wrote:

> a(1) = 2; afterwards, a(n) is the least new prime such that Omega(a(n-1) +
> a(n)) <4.
>
>  2, 7, 3, 5, 13, 17, 11, 19, 23, 29, 37, 31, 43, 59, 47, 67, 71, 53, 41,
> 61, 73, 97, 89, 83, 103, 79, 107, 131, 113, 101, 137, 109, 127, 139, 151,
> 163, 191, 167, 149, 173, 181, 157
> s = {2, 7}; p = 7; Do[q = 3; While [MemberQ [s, q] || PrimeOmega[p + q] >
> 3, q = NextPrime[q]]; AppendTo[s, p = q], {100}]; s
> ====================Dear SF gurus,Can/wish anyone to submit it to OEIS?Thx
> a lot,Zakzakseidov at yahoo.com
>
>
> --
> Seqfan Mailing list - http://list.seqfan.eu/
>