OFFSET
1,2
COMMENTS
Numbers k such that A073673(k) = k.
a(8) > 750. - R. J. Mathar, Jul 14 2015
PROG
(PARI) v=[1]; n=1; print1(1, ", "); while(#v<300, s=1+n*prod(i=1, #v, v[i]); if(ispseudoprime(s)&&!vecsearch(vecsort(v), n), v=concat(v, n); if(n==#v, print1(n, ", ")); n=0); n++)
CROSSREFS
KEYWORD
nonn,more,hard
AUTHOR
Derek Orr, Jun 22 2015
EXTENSIONS
a(8)-a(10) from Michael S. Branicky, May 19 2023
STATUS
approved