A264771 Primes of the form n^2 + phi(n).
2, 5, 11, 29, 131, 181, 233, 379, 991, 1109, 1249, 1721, 2633, 2861, 3539, 4273, 6971, 8009, 8353, 10301, 10711, 13313, 17291, 19973, 22349, 26053, 26731, 32941, 34369, 35129, 36671, 37441, 39799, 47269, 49033, 54521, 58321, 69431, 79241, 82609, 87257
Offset: 1
Examples
The prime 29 is in sequence because 29 = 5^2 + phi(5).
Programs
-
Magma
[a: n in [1..300] | IsPrime(a) where a is n^2 + EulerPhi(n)];
-
Mathematica
Select[Table[n^2 + EulerPhi[n], {n, 500}], PrimeQ] -
PARI
for(n=1, 1e3, if(isprime(k=n^2 + eulerphi(n)), print1(k, ", "))) \\ Altug Alkan, Nov 24 2015