%I #18 Apr 03 2023 07:51:10
%S 1,2,25,32,62,128,848,2091,2882,11761
%N Numbers n such that 75^n - 2 is prime.
%C Dedicated to N. J. A. Sloane for his 75th birthday!
%t Select[Range[1000],PrimeQ[75^#-2]&]
%o (Magma) [n: n in [0..200] | IsPrime(75^n-2)]; // _Vincenzo Librandi_, Oct 08 2014
%o (PARI) is(n)=ispseudoprime(75^n-2) \\ _Charles R Greathouse IV_, Jun 13 2017
%Y Cf. A014224, A109080, A090669, A128455, A128457, A128458, A128459, A128460.
%K nonn,more
%O 1,2
%A _Vaclav Kotesovec_, Oct 08 2014
%E a(10) from _Michael S. Branicky_, Apr 02 2023
|