|
%I #17 Jul 14 2022 05:48:32
%S 43,223,253,258,1303,1333,1338,1513,1518,1548,7783,7813,7818,7993,
%T 7998,8028,9073,9078,9108,9288,46663,46693,46698,46873,46878,46908,
%U 47953,47958,47988,48168,54433,54438,54468,54648,55728,279943,279973,279978,280153,280158,280188
%N Sums of 3 distinct powers of 6.
%H Robert Israel, <a href="/A038479/b038479.txt">Table of n, a(n) for n = 1..10000</a>
%p N:= 9: # to get all terms < 6^(N+1)
%p seq(seq(seq(6^i+6^j+6^k,k=0..j-1),j=1..i-1),i=2..N);
%t Union[Total/@Subsets[6^Range[0,8],{3}]] (* _Harvey P. Dale_, May 17 2011 *)
%Y Base-6 interpretation of A038445.
%Y Cf. A000400, A038478, A038480.
%K nonn,easy
%O 1,1
%A _Olivier Gérard_
%E Offset changed by _Robert Israel_, May 08 2018
|
