OFFSET
1,1
FORMULA
a(n) = A114845(n)/2.
PROG
(PARI) lista(pmax) = {my(v = [2], ans); print1(v[1], ", "); forprime(p=3, pmax, ans = 1; for(i=1, #v, if(bigomega(p + v[i]) != 2, ans = 0; break)); if(ans, print1(p, ", "); v=concat(v, p))); } \\ Amiram Eldar, Jun 27 2024
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Zak Seidov, Sep 03 2009
EXTENSIONS
a(12) from Amiram Eldar, Jun 27 2024
STATUS
approved