A091185 a(n) = A090938(n)/n.

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

Links

Table of n, a(n) for n=1..67.

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 * A324956 A268081 A319885

Adjacent sequences: A091182 A091183 A091184 * A091186 A091187 A091188

Keyword

nonn

Author

Ray Chandler, Jan 01 2004

Status

approved