A124253 Numbers k such that 1 + k^3 + k^5 is prime.
1, 2, 3, 5, 6, 9, 17, 20, 23, 27, 30, 39, 41, 47, 51, 57, 68, 72, 74, 78, 80, 96, 105, 111, 113, 122, 126, 131, 132, 134, 137, 143, 144, 149, 153, 161, 174, 176, 182, 189, 249, 251, 254, 263, 264, 281, 282, 293, 300, 311, 317, 321, 324, 342, 344, 350, 354, 363
Offset: 1
Programs
-
Magma
[n: n in [0..400] | IsPrime(1+n^3+n^5)] // Vincenzo Librandi, Mar 26 2010
-
Mathematica
Select[Range[400],PrimeQ[1+#^3+#^5]&] (* Harvey P. Dale, Apr 10 2012 *)
-
PARI
is(n)=isprime(1+n^3+n^5) \\ Charles R Greathouse IV, Jun 13 2017
Extensions
More terms from Vincenzo Librandi, Mar 26 2010