OFFSET
1,2
FORMULA
{k: k | A167706(k)}.
PROG
(PARI) lista(pmax) = {my(p1 = 2, p2 = 3, c = 1); print1(c, ", "); forprime(p3 = 5, pmax, if(p2 == p1 + 2, c++; if(!((p1+1)%c), print1(c, ", "))); if(p2 != p1 + 2 && p2 != p3 - 2, c++); p1 = p2; p2 = p3); } \\ Amiram Eldar, May 17 2024
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Juri-Stepan Gerasimov, Nov 17 2009
EXTENSIONS
Definition and a(6), a(7) corrected; 4 terms added - R. J. Mathar, Jun 04 2010
a(12)-a(13) from Amiram Eldar, May 17 2024
STATUS
approved