|
|
A131552
|
|
Least positive power of 3 having exactly n consecutive 1's in its decimal representation.
|
|
10
|
|
|
4, 19, 93, 334, 841, 3404, 7271, 7720, 44152, 406774, 993948, 2421339, 8786439, 11387707, 93548200
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
a(3)=93 because 3^93 (i.e., 235655016338368235499067731945871638181119123) is the smallest power of 3 to contain a run of 3 consecutive ones in its decimal form.
|
|
MATHEMATICA
|
a = ""; Do[ a = StringJoin[a, "1"]; b = StringJoin[a, "1"]; k = 1; While[ StringPosition[ ToString[3^k], a] == {} || StringPosition[ ToString[3^k], b] != {}, k++ ]; Print[k], {n, 1, 10} ]
|
|
PROG
|
(Python)
....m, s = 1, '1'*n
....for i in range(1, 10**9):
........m *= 3
........if s in str(m):
............return i
....return "search limit reached." # Chai Wah Wu, Dec 11 2014
|
|
CROSSREFS
|
|
|
KEYWORD
|
more,nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|