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.
%I A352889 #11 Apr 07 2022 13:20:47 %S A352889 1,2,2,1,2,3,4,2,2,3,4,2,3,2,2,1,2,3,4,3,4,3,4,5,4,3,2,1,2,4,5,4,3,4, %T A352889 3,4,5,4,3,2,3,4,3,2,3,4,4,3,4,2,3,4,3,2,3,4,5,6,4,6,5,4,5,4,6,3,4,2, %U A352889 3,4,3,4,3,2,2,1,4,5,4,5,6,5,4,3,4,5,4,3,4,5,6,7,6,5,6,4,5,2,5,4,4,3,2,3,4 %N A352889 Number of runs in the binary expansion of A109812(n). %H A352889 Antti Karttunen, <a href="/A352889/b352889.txt">Table of n, a(n) for n = 1..100000</a> %H A352889 <a href="/index/Bi#binary">Index entries for sequences related to binary expansion of n</a> %F A352889 a(n) = A005811(A109812(n)). %e A352889 n A109812(n) [in base-2] a(n) = number of runs %e A352889 -----+------------------------------------------------- %e A352889 1 | 1 [1], 1 %e A352889 2 | 2 [10], 2 %e A352889 3 | 4 [100], 2 %e A352889 4 | 3 [11], 1 %e A352889 5 | 8 [1000], 2 %e A352889 6 | 5 [101], 3 %e A352889 7 | 10 [1010], 4 %e A352889 8 | 16 [10000], 2 %e A352889 9 | 6 [110], 2 %e A352889 10 | 9 [1001], 3 %e A352889 11 | 18 [10010], 4 %o A352889 (PARI) %o A352889 v109812 = readvec("b109812_to10e5.txt"); \\ Prepared from b-file data with gawk ' { print $2 } ' %o A352889 up_to = #v109812; %o A352889 A109812(n) = v109812[n]; %o A352889 A352889(n) = A005811(A109812(n)); %Y A352889 Cf. A005811, A109812, A352575, A352884, A352888. %K A352889 nonn,base %O A352889 1,2 %A A352889 _Antti Karttunen_, Apr 07 2022