OFFSET
1,3
EXAMPLE
If k=96 then 22*3^k + 1 is a prime with 48 digits.
MATHEMATICA
Select[Range[0, 2000], PrimeQ[22*3^# + 1] &] (* Stefan Steinerberger, Aug 06 2006 *)
PROG
(Magma) [ n: n in [0..3000] | IsPrime(22*3^n + 1) ]; // Vincenzo Librandi, Jan 31 2011
(PARI) is(n)=ispseudoprime(22*3^n+1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Parthasarathy Nambi, Aug 04 2006
EXTENSIONS
More terms from Stefan Steinerberger, Aug 06 2006
a(32)-a(41) from Michael S. Branicky, Jul 14 2023
a(42) from Michael S. Branicky, Oct 24 2024
STATUS
approved