OFFSET
1,1
COMMENTS
Cyclic numbers of the fifth degree (or fifth order): the reciprocals of these numbers belong to one of five different cycles. Each cycle has the (number minus 1)/5 digits.
From Robert Israel, Apr 02 2018: (Start)
All terms == 1 (mod 10). (End)
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..10000 (terms 1..1000 from T. D. Noe)
MAPLE
select(t -> isprime(t) and numtheory:-order(10, t) = (t-1)/5, [seq(t, t=11..17000, 10)]); # Robert Israel, Apr 02 2018
MATHEMATICA
f[n_Integer] := Block[{ds = Divisors[n - 1]}, (n - 1)/Take[ ds, Position[ PowerMod[ 10, ds, n], 1] [[1, 1]]] [[ -1]]]; Select[ Prime[ Range[4, 2000]], f[ # ] == 5 &]
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Robert G. Wilson v, Aug 02 2000
EXTENSIONS
Entry revised by N. J. A. Sloane, Apr 30 2007
STATUS
approved