OFFSET
0,3
LINKS
Amiram Eldar, Table of n, a(n) for n = 0..10000
EXAMPLE
a(2) = 7 because x^7 == 0, 1, ... 14 (mod 15) => 2*7+1 = 15 distinct residues.
MATHEMATICA
lst:={}; Table[If[Length[Union[PowerMod[Range[0, 2*n], n, 2*n+1]]]==2*n+1, AppendTo[lst, n]], {n, 0, 320}]; lst
CROSSREFS
KEYWORD
nonn
AUTHOR
Michel Lagneau, Oct 20 2011
STATUS
approved