A046062 Primes of the form n*phi(n)+1 where phi(n) is the Euler function.

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

Author

Felice Russo

Keywords

• easy
• nice
• nonn

Comments

Listed in order of increasing n.

Examples

			7 because 3*phi(3)+1 = 7 is prime.
		

Links

• T. D. Noe, Table of n, a(n) for n=1..1000

Crossrefs

Cf. A002618, A046078.

Programs

Mathematica

Select[Array[# EulerPhi[#]+1&,500],PrimeQ] (* Harvey P. Dale, Apr 21 2012 *)