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,1

Links

Table of n, a(n) for n=1..41.

Example

The prime 29 is in sequence because 29 = 5^2 + phi(5).

Mathematica

Select[Table[n^2 + EulerPhi[n], {n, 500}], PrimeQ]

Prog

(Magma) [a: n in [1..300] | IsPrime(a) where a is n^2 + EulerPhi(n)];
(PARI) for(n=1, 1e3, if(isprime(k=n^2 + eulerphi(n)), print1(k, ", "))) \\ Altug Alkan, Nov 24 2015

Crossrefs

Cf. A000010, A000290, A258435, A264724.

Sequence in context: A160911 A092764 A237811 * A176637 A272675 A059075

Adjacent sequences: A264768 A264769 A264770 * A264772 A264773 A264774

Keyword

nonn,easy

Author

Vincenzo Librandi, Nov 24 2015

Status

approved