login
This site is supported by donations to The OEIS Foundation.

 

Logo

Many excellent designs for a new banner were submitted. We will use the best of them in rotation.

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A046147 Triangle read by rows in which row n lists the primitive roots mod n (omitting numbers n without a primitive root). 4
1, 2, 3, 2, 3, 5, 3, 5, 2, 5, 3, 7, 2, 6, 7, 8, 2, 6, 7, 11, 3, 5, 3, 5, 6, 7, 10, 11, 12, 14, 5, 11, 2, 3, 10, 13, 14, 15, 7, 13, 17, 19, 5, 7, 10, 11, 14, 15, 17, 19, 20, 21, 2, 3, 8, 12, 13, 17, 22, 23, 7, 11, 15, 19, 2, 5, 11, 14, 20, 23, 2, 3, 8, 10, 11, 14, 15, 18, 19, 21, 26 (list; graph; refs; listen; history; text; internal format)
OFFSET

2,2

LINKS

T. D. Noe, First 100 rows of triangle, flattened

Eric Weisstein's World of Mathematics, Primitive Root.

EXAMPLE

n followed by primitive roots, in any:

1 -

2 1

3 2

4 3

5 2 3

6 5

7 3 5

8 -

9 2 5

10 3 7

11 2 6 7 8

12 -

13 2 6 7 11

...

MATHEMATICA

a[n_] := Select[Range[n-1], GCD[#, n] == 1 && MultiplicativeOrder[#, n] == EulerPhi[n]& ]; Table[a[n], {n, 1, 30}] // Flatten (* Jean-Fran├žois Alcover, Oct 23 2012 *)

CROSSREFS

Cf. A001918, A046144, A046145, A046146.

Cf. A060749

Sequence in context: A112484 A174063 A124459 * A052369 A110976 A236483

Adjacent sequences:  A046144 A046145 A046146 * A046148 A046149 A046150

KEYWORD

nonn,tabf

AUTHOR

Eric W. Weisstein

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Superseeker | Recent | More pages
The OEIS Community | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified April 25 04:22 EDT 2014. Contains 240994 sequences.