A038468 Sums of 6 distinct powers of 3.

364, 850, 1012, 1066, 1084, 1090, 1092, 2308, 2470, 2524, 2542, 2548, 2550, 2956, 3010, 3028, 3034, 3036, 3172, 3190, 3196, 3198, 3244, 3250, 3252, 3268, 3270, 3276, 6682, 6844, 6898, 6916, 6922, 6924, 7330, 7384, 7402, 7408, 7410, 7546, 7564, 7570, 7572, 7618

Offset: 1

Author

Olivier Gérard

Keywords

• nonn
• easy

Links

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

Crossrefs

Cf. A000244, A038464, A038465, A038466, A038467, A038469.

Base 3 interpretation of A038448.

Programs

Mathematica

Sort[Plus @@@ Subsets[3^Range[0, 8], {6}]] (* Amiram Eldar, Jul 12 2022 *)

Python

from itertools import islice
def A038468_gen(): # generator of terms
    yield int(bin(n:=63)[2:],3)
    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:],3)
A038468_list = list(islice(A038468_gen(),30)) # Chai Wah Wu, Apr 05 2025

Extensions

Offset corrected by Amiram Eldar, Jul 12 2022