A083106 Triangle read by rows in which the n-th row contains n smallest numbers whose product == 1 mod n.

1, 1, 3, 1, 2, 5, 1, 3, 5, 7, 1, 2, 3, 4, 9, 1, 5, 7, 11, 13, 19, 1, 2, 3, 4, 5, 6, 13, 1, 3, 5, 7, 9, 11, 13, 15, 1, 2, 4, 5, 7, 8, 10, 11, 13, 1, 3, 7, 9, 11, 13, 17, 19, 21, 31, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 21, 1, 5, 7, 11, 13, 17, 19, 23, 25, 29, 31, 35, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12

Offset

1,3

Links

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

Example

1
1 3
1 2 5
1 3 5 7
1 2 3 4 9
1 5 7 11 13 19
...

Prog

(PARI) for (n = 1, 70, rowProd = 1; x = 1; for (k = 1, n - 1, while (gcd(x, n) > 1, x = x + 1); print1(x); print1(" "); write1("a083106.txt", x); write1("a083106.txt", " "); rowProd = rowProd*x; x = x + 1); while (rowProd*x%n != 1%n, x = x + 1); print(x); write1("a083106.txt", x); write1("a083106.txt", " "); write1("a083107.txt", x); write1("a083107.txt", " "); write1("a083108.txt", rowProd*x); write1("a083108.txt", " "); write1("a083109.txt", (rowProd*x-1)/n); write1("a083109.txt", " "));

Crossrefs

Cf. A083107, A083108, A083109.

Sequence in context: A113141 A134225 A136081 * A227042 A033765 A033777

Adjacent sequences: A083103 A083104 A083105 * A083107 A083108 A083109

Keyword

nonn,tabl

Author

Amarnath Murthy, Apr 22 2003

Extensions

More terms from David Wasserman, Oct 08 2004

Status

approved