OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..500
MATHEMATICA
Select[Range[15000], PowerMod[2, #+3, #]==1&] (* Harvey P. Dale, Jul 09 2018 *)
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Benoit Cloitre, Apr 25 2002
STATUS
approved