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 A055944 #19 Feb 09 2025 16:37:26 %S A055944 0,2,3,6,5,10,9,14,9,18,15,24,15,24,21,30,17,34,27,44,25,42,35,52,27, %T A055944 44,37,54,35,52,45,62,33,66,51,84,45,78,63,96,45,78,63,96,57,90,75, %U A055944 108,51,84,69,102,63,96,81,114,63,96,81,114,75,108,93,126,65,130,99,164,85 %N A055944 a(n) = n + (reversal of base-2 digits of n) (written in base 10). %C A055944 If n has an even number of digits in base-2 then a(n) is a multiple of 3. %H A055944 Reinhard Zumkeller, <a href="/A055944/b055944.txt">Table of n, a(n) for n = 0..10000</a> %F A055944 a(n) = n + A030101(n). %t A055944 f[n_] := Block[{id = IntegerDigits[n, 2]}, FromDigits[id + Reverse@id, 2]]; Array[f, 69, 0] (* _Robert G. Wilson v_, Nov 07 2010 *) %t A055944 Array[#+FromDigits[Reverse[IntegerDigits[#,2]],2]&,70,0] (* _Harvey P. Dale_, Feb 09 2025 *) %o A055944 (Haskell) %o A055944 a055944 n = n + a030101 n -- _Reinhard Zumkeller_, Nov 14 2011 %Y A055944 Cf. A030101, A035522 (iterated), A055948. %K A055944 base,nonn %O A055944 0,2 %A A055944 _Henry Bottomley_, Jul 18 2000