login
A178680
Numbers n such that the binary expansion of n contains the base 3 expansion of n as a substring.
2
0, 1, 9, 10, 12, 94, 118, 120, 1002, 1003, 2217, 22204, 22602, 26608, 27004, 27009, 531795, 774202, 776424, 776467, 1604056, 1616464, 1660780, 1673176, 1673299, 5021473, 5039860, 5039902, 5039904, 5042124, 5321298, 6384861, 16495194, 16495195
OFFSET
1,3
EXAMPLE
774202 = 10111101000000111010 (base 2)
774202 = ...1110100000011.... (base 3)
1604056 = 110000111100111011000 (base 2)
1604056 = .10000111100111...... (base 3)
MATHEMATICA
Do[i3=IntegerString[n, 2]; l3=StringLength[i3]; i=FromDigits[i3, 3]; i2=IntegerString[i, 2]; If[StringPosition[i2, i3]!={}, Print[i]]; , {n, 0, 10^7}]; (* Ray Chandler*)
CROSSREFS
Subsequence of A005836. Cf. A169828, A178679.
Sequence in context: A216780 A279731 A037408 * A178679 A154766 A116594
KEYWORD
base,nonn
AUTHOR
Zak Seidov and Ray Chandler, Jun 03 2010
STATUS
approved