OFFSET
1,2
COMMENTS
a(n) is the last element of row n of A254309.
LINKS
Alois P. Heinz, Table of n, a(n) for n = 1..10000
MAPLE
a:= n-> (p-> numtheory[primroot](p)&^(p-2) mod p)(ithprime(n)):
seq(a(n), n=1..70);
MATHEMATICA
a[n_] := With[{p = Prime[n]}, Mod[PrimitiveRoot[p]^(p-2), p]]; Array[a, 70] (* Jean-François Alcover, Mar 24 2017 *)
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Alois P. Heinz, May 04 2015
STATUS
approved