A099247 - OEIS

A099247

Numbers such that, in binary representation, the length and the number of ones are coprime.

1, 2, 4, 5, 6, 8, 11, 13, 14, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 32, 47, 55, 59, 61, 62, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,2

LINKS

Reinhard Zumkeller, Table of n, a(n) for n = 1..10000

Index entries for sequences related to binary expansion of n.

FORMULA

A099244(a(n)) = 1.

MATHEMATICA

Select[Range[150], CoprimeQ[IntegerLength[#, 2], DigitCount[#, 2, 1]]&] (* Harvey P. Dale, Sep 22 2012 *)

PROG

(Haskell)