OFFSET
0,2
REFERENCES
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).
LINKS
Reinhard Zumkeller, Table of n, a(n) for n = 0..10000
FORMULA
A030190(a(n)) = 0. [Reinhard Zumkeller, Dec 11 2011]
MATHEMATICA
Position[IntegerDigits[Range[0, 100], 2] // Flatten, 0] - 1 // Flatten (* Jean-François Alcover, Oct 06 2016 *)
PROG
(Haskell)
import Data.List (elemIndices)
a003607 n = a003607_list !! n
a003607_list = elemIndices 0 a030190_list
-- Reinhard Zumkeller, Dec 11 2011
(Python)
from itertools import count, islice
def A003607_gen(): # generator of terms
return (i for i, s in enumerate(d for n in count(0) for d in bin(n)[2:]) if s == '0')
CROSSREFS
KEYWORD
nonn,base
AUTHOR
STATUS
approved