A259530 Numbers k such that 136^k - 135^k is prime.
2, 7, 53, 103, 1171, 1699, 5953, 29131
Offset: 1
Crossrefs
Cf. A254298.
Programs
-
Magma
[n: n in [0..200] | IsPrime(136^n-135^n)]; // Vincenzo Librandi, Jul 01 2015
-
Mathematica
Select[Range[2, 200], PrimeQ[(136^# - 135^#)] &] (* Vincenzo Librandi, Jul 01 2015 *)
-
PARI
is(n)=ispseudoprime(136^n-135^n) \\ Charles R Greathouse IV, Jun 13 2017
Extensions
a(5)-a(6) from Vincenzo Librandi, Jul 01 2015
a(7) from Tim Johannes Ohrtmann, Mar 16 2018
a(8) from Michael S. Branicky, Oct 14 2024