OFFSET
1,1
COMMENTS
EXAMPLE
17 is in this sequence because phi(17) = phi(15) + phi(16); 16 = 8 + 8.
MAPLE
select(t -> isprime(t) and t-1 = numtheory:-phi(t-1) + numtheory:-phi(t-2), [seq(i, i=3..10^6, 2)]); # Robert Israel, Dec 22 2015
PROG
(Magma) [n: n in [3..5*10^7] | IsPrime(n) and EulerPhi(n) eq EulerPhi(n-2)+ EulerPhi(n-1)]
CROSSREFS
KEYWORD
nonn
AUTHOR
Jaroslav Krizek, Dec 22 2015
STATUS
approved