Svoboda | Graniru | BBC Russia | Golosameriki | Facebook
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A367625 (A036991(n)-1)/2. 3

%I #11 Nov 28 2023 00:06:43

%S 0,1,2,3,5,6,7,9,10,11,13,14,15,19,21,22,23,25,26,27,29,30,31,35,37,

%T 38,39,41,42,43,45,46,47,51,53,54,55,57,58,59,61,62,63,71,75,77,78,79,

%U 83,85,86,87,89,90,91,93,94,95,99,101,102,103,105,106,107,109,110,111,115,117,118,119,121,122,123,125,126,127

%N (A036991(n)-1)/2.

%H N. J. A. Sloane, <a href="/A367625/b367625.txt">Table of n, a(n) for n = 2..13496</a>

%o (Python)

%o from itertools import count, islice

%o def A367625_gen(startvalue=0): # generator of terms >= startvalue

%o if startvalue <= 0:

%o yield 0

%o for n in count(max(startvalue,1)):

%o s = bin(n)[2:]

%o c, l = 2, len(s)

%o for i in range(1,l+1):

%o c += int(s[l-i])<<1

%o if c <= i:

%o break

%o else:

%o yield n

%o A367625_list = list(islice(A367625_gen(),30)) # _Chai Wah Wu_, Nov 28 2023

%Y Cf. A036771, A367626, A367627.

%K nonn

%O 2,3

%A _N. J. A. Sloane_, Nov 27 2023

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified September 11 17:54 EDT 2024. Contains 375839 sequences. (Running on oeis4.)