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 A373854 #10 Jun 25 2024 05:26:43 %S A373854 1,5,6,7,12,8,13,14,9,14,15,16,22,10,15,16,17,23,18,24,25,11,16,17,18, %T A373854 24,19,25,26,20,26,27,28,35,12,17,18,19,25,20,26,27,21,27,28,29,36,22, %U A373854 28,29,30,37,31,38,39,13,18,19,20,26,21,27,28,22,28,29,30 %N A373854 Row sums of A373556. %H A373854 Paolo Xausa, <a href="/A373854/b373854.txt">Table of n, a(n) for n = 1..10000</a> %t A373854 Join[{1}, Map[Total[PositionIndex[Reverse[IntegerDigits[#, 2]]][1]] &, Select[Range[2, 2000, 2], DigitCount[#, 2, 1] == IntegerExponent[#, 2] + 1 &]]] %Y A373854 Cf. A373346, A373556, A373853. %K A373854 nonn,base,easy %O A373854 1,2 %A A373854 _Paolo Xausa_, Jun 19 2024