|
%I #19 Jul 12 2022 08:30:05
%S 11111111111,101111111111,110111111111,111011111111,111101111111,
%T 111110111111,111111011111,111111101111,111111110111,111111111011,
%U 111111111101,111111111110,1001111111111,1010111111111,1011011111111,1011101111111,1011110111111,1011111011111,1011111101111
%N Sums of 11 distinct powers of 10.
%H Amiram Eldar, <a href="/A038453/b038453.txt">Table of n, a(n) for n = 1..10000</a>
%t Union[Total/@Subsets[10^Range[0,12],{11}]] (* _Harvey P. Dale_, Jan 20 2013 *)
%o (PARI) lista(nn) = {for (n=1, nn, if (hammingweight(n) == 11, print1(subst(Pol(binary(n)), x, 10), ", ");););} \\ _Michel Marcus_, Feb 29 2016
%Y Cf. A011557.
%Y Cf. A038444, A038445, A038446, A038447, A038448, A038449, A038450, A038451, A038452, A038454.
%K nonn,easy
%O 1,1
%A _Olivier Gérard_
%E Offset changed to 1 by _Ivan Neretin_, Feb 28 2016
|
