login
A038453
Sums of 11 distinct powers of 10.
10
11111111111, 101111111111, 110111111111, 111011111111, 111101111111, 111110111111, 111111011111, 111111101111, 111111110111, 111111111011, 111111111101, 111111111110, 1001111111111, 1010111111111, 1011011111111, 1011101111111, 1011110111111, 1011111011111, 1011111101111
OFFSET
1,1
LINKS
MATHEMATICA
Union[Total/@Subsets[10^Range[0, 12], {11}]] (* Harvey P. Dale, Jan 20 2013 *)
PROG
(PARI) lista(nn) = {for (n=1, nn, if (hammingweight(n) == 11, print1(subst(Pol(binary(n)), x, 10), ", "); ); ); } \\ Michel Marcus, Feb 29 2016
KEYWORD
nonn,easy
EXTENSIONS
Offset changed to 1 by Ivan Neretin, Feb 28 2016
STATUS
approved