A032943 Numbers whose base-8 representation Sum_{i=0..m} d(i)*8^(m-i) has d(i)=0 for all odd i.

1, 2, 3, 4, 5, 6, 7, 8, 16, 24, 32, 40, 48, 56, 64, 65, 66, 67, 68, 69, 70, 71, 128, 129, 130, 131, 132, 133, 134, 135, 192, 193, 194, 195, 196, 197, 198, 199, 256, 257, 258, 259, 260, 261, 262, 263, 320, 321, 322, 323, 324, 325, 326

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• base

Links

• Robert Israel, Table of n, a(n) for n = 1..10000

Crossrefs

Cf. A007094 (numbers in base 8).

Programs

Maple

b:= 8:
f:= proc(n, j) local L, m;
  L:= convert(n, base, b);
  m:= nops(L);
  j*add(L[i+1]*b^(2*i), i=0..m-1)
end proc:
seq(seq(seq(f(n, j), n=b^k..b^(k+1)-1), j=[1, b]), k=0..2); # Robert Israel, Nov 16 2020

Extensions

Definition corrected by Robert Israel, Nov 16 2020