OFFSET
1,2
COMMENTS
Or (7^k + 3)/2 is prime.
a(7) > 18000. - Jinyuan Wang, Mar 04 2020
EXAMPLE
7^1 + 3 = 19 = 2*5,
7^3 + 3 = 346 = 2*173,
7^31 + 3 = 2*78887691017422903307521373,
7^47 + 3 = 2*2621669158378151817230729359430975727773,
7^83 + 3 = 2*6951960974910262341699296037696359556850100616048572362472005937832173.
MATHEMATICA
Do[ If[ PrimeQ[(7^n + 3)/2], Print@n], {n, 1, 11501, 2}] (* Robert G. Wilson v *)
PROG
(PARI) is(k) = ispseudoprime((7^k+3)/2); \\ Jinyuan Wang, Mar 04 2020
CROSSREFS
KEYWORD
nonn,more,less
AUTHOR
Zak Seidov, Jun 14 2006
EXTENSIONS
a(6) from Robert G. Wilson v, Jun 14 2006
STATUS
editing