login
Numbers whose base-8 sum of digits is 8.
9

%I #27 Jul 10 2022 11:36:59

%S 15,22,29,36,43,50,57,71,78,85,92,99,106,113,120,134,141,148,155,162,

%T 169,176,197,204,211,218,225,232,260,267,274,281,288,323,330,337,344,

%U 386,393,400,449,456,519,526,533,540,547,554,561,568,582,589,596,603

%N Numbers whose base-8 sum of digits is 8.

%C Subsequence of A016993. - _Michel Marcus_, Sep 03 2013

%C In general, the set of numbers with sum of base-b digits equal to b is a subset of { (b-1)*k + 1; k = 2, 3, 4, ... }. - _M. F. Hasler_, Dec 23 2016

%H Michael S. Branicky, <a href="/A227095/b227095.txt">Table of n, a(n) for n = 1..10000</a>

%e The 8-ary expansion of 15 is (1,7), which has sum of digits 8.

%e The 8-ary expansion of 78 is (1,1,6), which has sum of digits 8.

%e 10 is not on the list since the 8-ary expansion of 10 is (1,2), which has sum of digits 3 not 8.

%t Select[Range@ 603, Total@ IntegerDigits[#, 8] == 8 &] (* _Michael De Vlieger_, Dec 23 2016 *)

%o (Sage) [i for i in [0..1000] if sum(Integer(i).digits(base=8))==8]

%o (PARI) select( is(n)=sumdigits(n,8)==8, [1..999]) \\ _M. F. Hasler_, Dec 23 2016

%o (Python)

%o agen = A226636gen(sod=8, base=8) # generator of terms using code in A226636

%o print([next(agen) for n in range(1, 55)]) # _Michael S. Branicky_, Jul 10 2022

%Y Cf. A018900, A187813.

%Y Cf. A226636 (b = 3), A226969 (b = 4), A227062 (b = 5), A227080 (b = 6), A227092 (b = 7), A227095 (b = 8), A227238 (b = 9), A052224 (b = 10).

%K nonn,base

%O 1,1

%A _Tom Edgar_, Sep 01 2013