OFFSET
1,1
COMMENTS
Numbers k such that A062173(k) is prime.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
MATHEMATICA
Select[Range[323], PrimeQ[Mod[2^(#-1), #]] &]
Select[Range[350], PrimeQ[PowerMod[2, #-1, #]]&] (* Harvey P. Dale, Jun 07 2016 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Juri-Stepan Gerasimov, Dec 02 2010
STATUS
approved