OFFSET
1,2
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
phi(145) + prime(145) = 941 (a prime).
MAPLE
select(k -> isprime(numtheory:-phi(k) + ithprime(k)), [$1..1000]); # Robert Israel, Aug 18 2024
MATHEMATICA
Select[Range[145], PrimeQ[EulerPhi[#]+Prime[#]]&] (* James C. McMahon, Sep 27 2024 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Giovanni Resta, Feb 13 2006
STATUS
approved