A214288 Primes of the form phi(n)+1 sorted by increasing n, where phi is the Euler totient function.
2, 2, 3, 3, 5, 3, 7, 5, 7, 5, 11, 5, 13, 7, 17, 7, 19, 13, 11, 23, 13, 19, 13, 29, 31, 17, 17, 13, 37, 19, 17, 41, 13, 43, 23, 47, 17, 43, 53, 19, 41, 37, 29, 59, 17, 61, 31, 37, 67, 71, 73, 37, 41, 37, 61, 79, 41, 83, 43, 41, 89, 73, 61, 47, 73, 97, 43, 61, 41, 101, 103, 53, 107, 37
Offset: 1
Links
- Vincenzo Librandi, Table of n, a(n) for n = 1..1000
Programs
-
Mathematica
Select[Table[EulerPhi[n]+1,{n,1,1000}],PrimeQ]
Comments