A242199 Numbers k such that k*16^k + 1 is prime.
1, 3, 55, 81, 223, 1227, 3012, 3301
Offset: 1
Links
- G. Loeh, Generalized Cullen primes
Crossrefs
Cf. similar sequences listed in A242176.
Programs
-
Magma
[n: n in [0..2000] | IsPrime(n*16^n+1)];
-
Mathematica
Select[Range[2000], PrimeQ[# 16^# + 1] &]
-
PARI
is(n)=ispseudoprime(n*16^n+1) \\ Charles R Greathouse IV, Jun 06 2017
-
Sage
[n for n in (1..2000) if is_prime(n*16^n + 1)] # Bruno Berselli, May 09 2014
Extensions
a(7)-a(8) from Loeh's list (see Links)