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 A319785 #20 Aug 07 2024 16:26:55
%S A319785 0,2,3,6,5,9,9,14,9,15,15,21,15,21,21,30,17,27,27,35,27,35,35,45,27,
%T A319785 35,35,45,35,45,45,62,33,51,51,63,51,63,63,75,51,63,63,75,63,75,75,93,
%U A319785 51,63,63,75,63,75,75,93,63,75,75,93,75,93,93,126,65,99,99,119
%N A319785 a(n) = A073138(n) + A038573(n).
%C A319785 This sequence is different from A055944. For example, A055944(5) = 10 and a(5) = 9.
%H A319785 Seiichi Manyama, <a href="/A319785/b319785.txt">Table of n, a(n) for n = 0..8191</a>
%t A319785 Table[FromDigits[Reverse[#], 2] + FromDigits[#, 2] & [Sort[IntegerDigits[n, 2]]], {n, 0, 100}] (* _Paolo Xausa_, Aug 07 2024 *)
%o A319785 (PARI) a(n) = my(dn=binary(n)); fromdigits(vecsort(dn), 2) + fromdigits(vecsort(dn,,4), 2); \\ _Michel Marcus_, Sep 28 2018
%Y A319785 Base b: this sequence (b=2), A319803 (b=3), A319804 (b=4), A319805 (b=5), A319806 (b=6), A319807 (b=7), A319808 (b=8), A319747 (b=9), A052008 (b=10).
%Y A319785 Cf. A038573, A055944, A073138.
%K A319785 nonn,base,look
%O A319785 0,2
%A A319785 _Seiichi Manyama_, Sep 27 2018