cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A328869 Numbers whose lengths of runs of 1's in their reversed binary expansion are weakly increasing.

This page as a plain text file.
%I A328869 #5 Nov 12 2019 19:23:14
%S A328869 1,2,3,4,5,6,7,8,9,10,12,13,14,15,16,17,18,20,21,24,25,26,27,28,29,30,
%T A328869 31,32,33,34,36,37,40,41,42,48,49,50,51,52,53,54,56,57,58,59,60,61,62,
%U A328869 63,64,65,66,68,69,72,73,74,80,81,82,84,85,96,97,98,99
%N A328869 Numbers whose lengths of runs of 1's in their reversed binary expansion are weakly increasing.
%e A328869 The sequence of terms together with their reversed binary expansions begins:
%e A328869    1: (1)
%e A328869    2: (01)
%e A328869    3: (11)
%e A328869    4: (001)
%e A328869    5: (101)
%e A328869    6: (011)
%e A328869    7: (111)
%e A328869    8: (0001)
%e A328869    9: (1001)
%e A328869   10: (0101)
%e A328869   12: (0011)
%e A328869   13: (1011)
%e A328869   14: (0111)
%e A328869   15: (1111)
%e A328869   16: (00001)
%e A328869   17: (10001)
%e A328869   18: (01001)
%e A328869   20: (00101)
%e A328869   21: (10101)
%e A328869   24: (00011)
%t A328869 Select[Range[100],LessEqual@@Length/@Split[Join@@Position[Reverse[IntegerDigits[#,2]],1],#2==#1+1&]&]
%Y A328869 Complement of A328870.
%Y A328869 The version for prime indices is A304678.
%Y A328869 The binary expansion of n has A069010(n) runs of 1's.
%Y A328869 Cf. A000120, A003714, A014081, A112769, A164707, A245563, A328592.
%K A328869 nonn
%O A328869 1,2
%A A328869 _Gus Wiseman_, Nov 12 2019