|
|
A054508
|
|
Log_b 5 where b is smallest primitive root (A001918) mod n-th prime.
|
|
0
|
|
|
5, 4, 9, 5, 16, 1, 22, 20, 23, 22, 25, 1, 47, 6, 22, 15, 28, 1, 62, 27, 70, 1, 24, 1, 47, 76, 83, 87, 46, 75, 86, 104, 112, 1, 15, 1, 39, 138, 156, 50, 1, 89, 138, 132, 89, 11, 98, 165, 138, 138, 130, 55, 1, 208, 170, 1, 186, 233, 173, 1, 196, 39, 243, 236, 33, 277, 314
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
4,1
|
|
REFERENCES
|
T. M. Apostol, Introduction to Analytic Number Theory, Springer-Verlag, Table 10.2, pp. 216-217.
|
|
LINKS
|
Table of n, a(n) for n=4..70.
|
|
MATHEMATICA
|
a[n_] := Module[{p, b, lg = 1}, b = PrimitiveRoot[p = Prime[n]]; While[ PowerMod[b, lg, p] != 5, lg++]; lg]; Array[a, 100, 4] (* Jean-François Alcover, Sep 03 2016 *)
|
|
CROSSREFS
|
Cf. table in A054503. Also A054505-A054513.
Sequence in context: A057763 A198609 A332794 * A110617 A234356 A338502
Adjacent sequences: A054505 A054506 A054507 * A054509 A054510 A054511
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
N. J. A. Sloane, Apr 09 2000
|
|
EXTENSIONS
|
More terms from James A. Sellers, Apr 09 2000
|
|
STATUS
|
approved
|
|
|
|