OFFSET
1,2
COMMENTS
Some have exactly one 1. These are exclusively of the form 2^n, but not universally. 512 = 1000000000b, 1 one. 2048 = 100000000000b but 2048 lacks a 1 digit. The smallest integer with 6 ones in both decimal and binary bases is 11011112 = 101010000000010000101000b.
If n is in the sequence and n == 0, 5, 9, 10, 13 or 17 (mod 20) or 11 (mod 40), then n+1 is in the sequence. - Robert Israel, Jun 17 2020
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..10000 (first 250 terms from Robert Israel)
EXAMPLE
a(6)=1152 because 1152 base 2 = 10010000000 and both terms have the same number of ones.
MAPLE
filter:= proc(n) numboccur(1, convert(n, base, 2))=numboccur(1, convert(n, base, 10)) end proc:
select(filter, [$1..2*10^5]); # Robert Israel, Jun 16 2020
CROSSREFS
KEYWORD
AUTHOR
Gil Broussard, Dec 18 2008
STATUS
approved