OFFSET
1,3
COMMENTS
LINKS
Burthe, R. J., Jr. Upper bounds for least witnesses and generating sets. Acta Arith. 80:4 (1997), 311-326.
Wikipedia, Multiplicative group of integers modulo n.
PROG
(PARI) { A285512(n) = my(S, s, t); S=Set([Mod(1, n)]); t=1; while( #S!=eulerphi(n), until(n%t, t=nextprime(t+1)); until(#S==s, s=#S; S=setunion(S, Set(S*t))); ); t; }
CROSSREFS
KEYWORD
nonn
AUTHOR
Max Alekseyev and Thomas Ordowski, Apr 20 2017
STATUS
approved