|
|
A229197
|
|
Beginning position of n in the decimal expansion of log(10).
|
|
1
|
|
|
3, 21, 1, 2, 13, 5, 17, 22, 6, 9, 41, 40, 322, 368, 25, 266, 154, 21, 398, 103, 35, 236, 112, 1, 79, 4, 70, 60, 48, 10, 2, 190, 59, 57, 101, 77, 32, 178, 700, 197, 13, 102, 34, 31, 253, 15, 28, 251, 44, 277, 7
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Module[{d=RealDigits[Log[10], 10, 1000][[1]]}, Table[SequencePosition[ d, IntegerDigits[ n], 1][[All, 1]], {n, 0, 50}]]//Flatten (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Nov 28 2019 *)
|
|
CROSSREFS
|
Cf. A002392 (decimal expansion of log(10)).
|
|
KEYWORD
|
nonn,base,less
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|