A062849 When expressed in base 2 and then interpreted in base 8, is a multiple of the original number.
0, 1, 2, 3, 4, 5, 6, 8, 9, 10, 12, 15, 16, 17, 18, 20, 24, 27, 30, 31, 32, 33, 34, 36, 40, 45, 48, 51, 54, 60, 62, 64, 65, 66, 68, 72, 80, 85, 90, 93, 96, 99, 102, 108, 120, 124, 127, 128, 129, 130, 132, 135, 136, 144, 153, 160, 165, 170, 180, 186, 192, 195, 198, 204
Offset: 1
Examples
15 in base 2 is 1111, which interpreted in base 8 is 585=39*15.
Links
- Ivan Neretin, Table of n, a(n) for n = 1..1775 (all terms below 10^6)
Programs
-
Mathematica
Join[{0}, Select[Range@210, Divisible[FromDigits[IntegerDigits[#, 2], 8], #] &]] (* Ivan Neretin, Aug 31 2015 *)