A126909 Numbers n such that 1 + n^2 + n^4 + n^6 + n^8 + n^9 is prime.

2, 18, 48, 56, 116, 120, 128, 146, 194, 198, 200, 230, 266, 278, 282, 288, 324, 362, 372, 390, 396, 420, 434, 458, 488, 576, 594, 708, 714, 728, 740, 774, 818, 830, 860, 888, 896, 912, 914, 990, 996, 1002, 1008, 1010, 1016, 1044, 1124, 1128, 1140, 1146, 1260

Offset

1,1

Links

Daniel Starodubtsev, Table of n, a(n) for n = 1..10000

Mathematica

a = {}; Do[If[PrimeQ[1 + n^2 + n^4 + n^6 + n^8 + n^9], AppendTo[a, n]], {n, 1, 1400}]; a
Select[Range[1300], PrimeQ[1+#^2+#^4+#^6+#^8+#^9]&] (* Harvey P. Dale, Apr 25 2020 *)

Prog

(PARI) is(n)=isprime(1+n^2+n^4+n^6+n^8+n^9) \\ Charles R Greathouse IV, Jun 13 2017

Crossrefs

Cf. A049407, A124175 A124176 A124177, A124178, A124179, A124180, A124181, A126908-A126916.

Sequence in context: A131538 A009820 A304933 * A139268 A052681 A208652

Adjacent sequences: A126906 A126907 A126908 * A126910 A126911 A126912

Keyword

nonn,easy

Author

Artur Jasinski, Dec 31 2006

Status

approved