A259535 Numbers k such that 159^k - 158^k is prime.
2, 3, 17, 107, 13313
Offset: 1
Crossrefs
Cf. A254298.
Programs
-
Magma
[n: n in [0..1000] | IsPrime(159^n-158^n)]; // Vincenzo Librandi, Jul 01 2015
-
Mathematica
Select[Range[2000], PrimeQ[159^# - 158^#] &] (* Vincenzo Librandi, Jul 01 2015 *)
-
PARI
is(n)=ispseudoprime(159^n-158^n) \\ Charles R Greathouse IV, Jun 13 2017
Extensions
a(4) from Vincenzo Librandi, Jul 01 2015
a(5) from Tim Johannes Ohrtmann, Jun 20 2016
Comments