OFFSET
1,1
COMMENTS
a(5) is only a strong pseudoprime. - Tim Johannes Ohrtmann, Jun 20 2016
a(6) > 30000. - Michael S. Branicky, Oct 15 2024
MATHEMATICA
Select[Range[2000], PrimeQ[159^# - 158^#] &] (* Vincenzo Librandi, Jul 01 2015 *)
PROG
(Magma) [n: n in [0..1000] | IsPrime(159^n-158^n)]; // Vincenzo Librandi, Jul 01 2015
(PARI) is(n)=ispseudoprime(159^n-158^n) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,more,hard
AUTHOR
Michael P. May, Jun 29 2015
EXTENSIONS
a(4) from Vincenzo Librandi, Jul 01 2015
a(5) from Tim Johannes Ohrtmann, Jun 20 2016
STATUS
approved