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

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A073761 Primitive numbers whose decimal expansion of 1/n is equidistributed in base 10. 1
61, 131, 181, 461, 491, 541, 571, 701, 811, 821, 941, 971, 1021, 1051, 1091, 1171, 1181, 1291, 1301, 1349, 1381, 1531, 1571, 1621, 1741, 1811, 1829, 1861, 2141, 2221, 2251, 2341, 2371, 2411, 2621, 2731, 2741, 2851, 2861, 2971, 3011, 3221, 3251, 3301 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,1

COMMENTS

Usually once a number has the desired property, so do all its multiples. However there are exceptions. 61*7 in base 10 is not equidistributed. Multiples of earlier numbers are not included here.

REFERENCES

David Wells, The Penguin Dictionary of Curious and Interesting Numbers, revised edition, London, England, 1997, entry 61, page 110.

LINKS

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

EXAMPLE

a(1) = 61 because 1/61 = .016393... (period 60 digits, 6 of each 0,1,..9).

MATHEMATICA

a = {}; Do[d = RealDigits[1/n][[1, 1]]; If[ !IntegerQ[d] && Count[d, 0] == Count[d, 1] == Count[d, 2] == Count[d, 3] == Count[d, 4] == Count[d, 5] == Count[d, 6] == Count[d, 7] == Count[d, 8] == Count[d, 9], If[ Select[n/a, IntegerQ] == {}, a = Append[a, n]]], {n, 11, 3330}]; a

CROSSREFS

Cf. A074709.

Sequence in context: A044629 A283425 A142065 * A142093 A063337 A142172

Adjacent sequences:  A073758 A073759 A073760 * A073762 A073763 A073764

KEYWORD

nonn,base

AUTHOR

Donald S. McDonald, Sep 02 2002

EXTENSIONS

Edited by Robert G. Wilson v, Sep 06 2002

STATUS

approved

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

License Agreements, Terms of Use, Privacy Policy .

Last modified July 25 02:44 EDT 2017. Contains 289779 sequences.