login
A046062
Primes of the form n*phi(n)+1 where phi(n) is the Euler function.
2
2, 3, 7, 13, 43, 41, 157, 109, 193, 313, 487, 337, 241, 661, 433, 937, 641, 881, 1013, 769, 1249, 2053, 1861, 2269, 3121, 1321, 4423, 3037, 3001, 4621, 1873, 6163, 2017, 5441, 3613, 2161, 6553, 4049, 5581
OFFSET
1,1
COMMENTS
Listed in order of increasing n.
EXAMPLE
7 because 3*phi(3)+1 = 7 is prime.
MATHEMATICA
Select[Array[# EulerPhi[#]+1&, 500], PrimeQ] (* Harvey P. Dale, Apr 21 2012 *)
CROSSREFS
Sequence in context: A056893 A051130 A078749 * A096263 A007996 A206579
KEYWORD
easy,nice,nonn
AUTHOR
STATUS
approved