OFFSET
1,3
LINKS
T. D. Noe, Table of n, a(n) for n = 1..1000
FORMULA
From Jianing Song, May 13 2024: (Start)
a(n) <= (prime(n) - 1)/2. Those prime(n) for which a(n) = (prime(n) - 1)/2 are listed in A364867. (End)
MATHEMATICA
nn = 9; Table[If[Mod[nn, p] == 0, 0, MultiplicativeOrder[nn, p]], {p, Prime[Range[100]]}]
PROG
(GAP) A000040:=Filtered([1..350], IsPrime);;
(PARI) a(n, {base=9}) = my(p=prime(n)); if(base%p, znorder(Mod(base, p)), 0) \\ Jianing Song, May 13 2024
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
T. D. Noe, Apr 11 2012
STATUS
approved