|
|
A332492
|
|
Self-locating numbers within the decimal expansion of log(2): strings k beginning at position k (first digit after decimal point is position 2).
|
|
0
|
|
|
7, 23, 52, 54, 86, 303, 389, 5112, 60392, 87491, 94788, 97115, 616916, 672938066
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
a(15) > 10^9.
52 and 54 are self-locating numbers which appear consecutively in log(2) = 0.693...5254....
|
|
LINKS
|
|
|
EXAMPLE
|
For 0.693147..., if 6 appears at position 2, then 7 appears at position 7.
|
|
MATHEMATICA
|
dlog2 = RealDigits[Log[2], 10, 1000010][[1]]; Select[Range[2, 1000000], FromDigits[Take[dlog2, {# - 1, # - 2 + IntegerLength[#]}]] == # &] (* Vaclav Kotesovec, Feb 18 2020 *)
|
|
CROSSREFS
|
Decimal expansion of log(2): A002162.
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|