OFFSET
1,1
COMMENTS
m is in the sequence iff m = phi(m) + pi(m) + 1.
a(15) > 2*10^12. - Giovanni Resta, Mar 31 2017
EXAMPLE
15 is in the sequence because phi(15)=8 & 15=A002808(8).
MATHEMATICA
Do[If[n==EulerPhi[n]+PrimePi[n]+1, Print[n]], {n, 75000000}]
PROG
(PARI) isok(n) = eulerphi(n)+primepi(n) == n - 1; \\ Michel Marcus, Apr 01 2017
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Farideh Firoozbakht, Dec 01 2004
EXTENSIONS
a(9)-a(10) from Donovan Johnson, Aug 28 2012
a(11)-a(14) from Giovanni Resta, Mar 31 2017
STATUS
approved