login
A091185
a(n) = A090938(n)/n.
0
1, 2, 2, 2, 9, 11, 5, 12, 18, 3, 17, 34, 19, 40, 22, 10, 7, 17, 60, 32, 7, 18, 65, 26, 66, 35, 42, 65, 94, 49, 41, 86, 54, 45, 132, 21, 17, 133, 30, 13, 131, 125, 40, 136, 162, 13, 9, 79, 139, 142, 32, 23, 191, 172, 243, 155, 118, 257, 108, 89, 116, 52, 39, 277, 183, 293, 84
OFFSET
1,2
MATHEMATICA
Replace[Table[Reduce[n*x==1, x, Modulus->Prime[n]], {n, 1000}], Equal[x, p_]->p, {1}] (* Ivan N. Ianakiev, May 31 2016 *)
CROSSREFS
Cf. A090938.
Sequence in context: A157649 A155695 A195706 * A372723 A324956 A268081
KEYWORD
nonn
AUTHOR
Ray Chandler, Jan 01 2004
STATUS
approved