A225818 Numbers n such that (19^n + 18^n)/37 is prime.
5, 223, 311, 54547
Offset: 1
Programs
-
Mathematica
Select[ Prime[ Range[1, 100000] ], PrimeQ[ (19^# + 18^#)/37 ]& ]
-
PARI
is(n)=ispseudoprime((19^n+18^n)/37) \\ Charles R Greathouse IV, Jun 06 2017
Comments