A276741 Integers n such that 10^n + 5^n + 2^n is a prime.
0, 1, 7, 31, 37, 71, 235, 515, 1199, 1815, 6587, 30429, 35589, 42147, 58571
Offset: 1
Crossrefs
Cf. A125706.
Programs
-
Mathematica
Do[f=10^n+5^n+2^n; If[PrimeQ[f], Print[{n, f}]], {n, 1, 2000}]
-
PARI
is(n) = ispseudoprime(10^n+5^n+2^n) \\ Felix Fröhlich, Sep 17 2016
Extensions
a(11) from Felix Fröhlich, Sep 17 2016
a(12)-a(15) from Robert Price, Dec 29 2016
Comments