|
|
A113509
|
|
Numbers whose natural logarithm, in base 10, starts with 10 distinct digits.
|
|
1
|
|
|
587, 9630, 9971, 11056, 11211, 15109, 18724, 18883, 19290, 28780, 31182, 33713, 35788, 38919, 39527, 41879, 44171, 45645, 46335, 46746, 48721, 51520, 58890, 172189, 173487, 173509, 174370, 174442, 175513, 177317, 179239, 179415, 179429
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
log(587)= 6.375024819...
|
|
MATHEMATICA
|
Do[If[Union@Take[RealDigits[s = Log[k], 10, 20][[1]], 10] == Range[0, 9], Print[{k, N[s, 15]}]], {k, 10^6}]
With[{c=Range[0, 9]}, Select[Range[180000], Sort[RealDigits[Log[#], 10, 10][[1]]]==c&]] (* Harvey P. Dale, Apr 19 2012 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,easy,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|