cp's OEIS Frontend

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.

A038454 Sums of 12 distinct powers of 10.

This page as a plain text file.
%I A038454 #22 Mar 11 2025 09:44:46
%S A038454 111111111111,1011111111111,1101111111111,1110111111111,1111011111111,
%T A038454 1111101111111,1111110111111,1111111011111,1111111101111,
%U A038454 1111111110111,1111111111011,1111111111101,1111111111110,10011111111111,10101111111111,10110111111111,10111011111111,10111101111111
%N A038454 Sums of 12 distinct powers of 10.
%H A038454 Robert Israel, <a href="/A038454/b038454.txt">Table of n, a(n) for n = 1..10000</a>
%F A038454 a(binomial(N,12)+k) = 10^N + A038453(k) for 1 <= k <= binomial(N,11). - _Robert Israel_, Feb 28 2016
%p A038454 N:= 14: # to get all terms of at most N digits
%p A038454 sort(map(t -> (10^N-1)/9 - add(10^j, j=t),
%p A038454 combinat:-choose([$0..N-1],N-12))); # _Robert Israel_, Feb 28 2016
%t A038454 Sort[Plus @@@ Subsets[10^Range[0, 12], {12}]] (* _Amiram Eldar_, Jul 12 2022 *)
%o A038454 (Python)
%o A038454 from itertools import islice
%o A038454 def A038454_gen(): # generator of terms
%o A038454     yield int(bin(n:=4095)[2:])
%o A038454     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 A038454 A038454_list = list(islice(A038454_gen(),20)) # _Chai Wah Wu_, Mar 11 2025
%Y A038454 Cf. A011557.
%Y A038454 Cf. A038444, A038445, A038446, A038447, A038448, A038449, A038450, A038451, A038452, A038453.
%K A038454 nonn,easy
%O A038454 1,1
%A A038454 _Olivier Gérard_
%E A038454 Offset changed to 1 by _Ivan Neretin_, Feb 28 2016