A038450 Sums of 8 distinct powers of 10.

11111111, 101111111, 110111111, 111011111, 111101111, 111110111, 111111011, 111111101, 111111110, 1001111111, 1010111111, 1011011111, 1011101111, 1011110111, 1011111011, 1011111101, 1011111110, 1100111111, 1101011111, 1101101111, 1101110111, 1101111011, 1101111101

Offset

1,1

Links

Amiram Eldar, Table of n, a(n) for n = 1..10000

Mathematica

Sort[FromDigits/@Permutations[{1, 1, 1, 1, 1, 1, 1, 1, 0, 0}]] (* Harvey P. Dale, Apr 29 2013 *)

Prog

(Python)
from itertools import islice
def A038450_gen(): # generator of terms
    yield int(bin(n:=255)[2:])
    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:])
A038450_list = list(islice(A038450_gen(), 20)) # Chai Wah Wu, Mar 11 2025

Crossrefs

Cf. A011557.

Cf. A038444, A038445, A038446, A038447, A038448, A038449, A038451, A038452, A038453, A038454.

Sequence in context: A274834 A094326 A108717 * A075093 A206519 A270491

Adjacent sequences: A038447 A038448 A038449 * A038451 A038452 A038453

Keyword

nonn,easy

Author

Olivier Gérard

Extensions

Offset corrected by Amiram Eldar, Jul 12 2022

Status

approved