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 A038452 #20 Mar 11 2025 03:42:52 %S A038452 1111111111,10111111111,11011111111,11101111111,11110111111, %T A038452 11111011111,11111101111,11111110111,11111111011,11111111101, %U A038452 11111111110,100111111111,101011111111,101101111111,101110111111,101111011111,101111101111,101111110111,101111111011,101111111101 %N A038452 Sums of 10 distinct powers of 10. %H A038452 Amiram Eldar, <a href="/A038452/b038452.txt">Table of n, a(n) for n = 1..10000</a> %t A038452 Take[Union[Total/@Subsets[10^Range[0,15],{10}]],20] (* _Harvey P. Dale_, Dec 19 2011 *) %o A038452 (Python) %o A038452 from itertools import islice %o A038452 def A038452_gen(): # generator of terms %o A038452 yield int(bin(n:=1023)[2:]) %o A038452 while True: yield int(bin((n:=n^((a:=-n&n+1)|(a>>1)) if n&1 else ((n&~(b:=n+(a:=n&-n)))>>a.bit_length())^b))[2:]) %o A038452 A038452_list = list(islice(A038452_gen(),20)) # _Chai Wah Wu_, Mar 10 2025 %Y A038452 Cf. A011557. %Y A038452 Cf. A038444, A038445, A038446, A038447, A038448, A038449, A038450, A038451, A038453, A038454. %K A038452 nonn,easy %O A038452 1,1 %A A038452 _Olivier Gérard_ %E A038452 Offset changed to 1 by _Ivan Neretin_, Feb 28 2016