A344343 - OEIS

%I #7 May 16 2021 02:41:17

%S 1,2,6,7,14,30,31,62,126,127,174,184,234,243,254,304,474,483,510,511,

%T 534,543,544,783,784,903,904,954,963,1022,1134,1144,1253,1264,1448,

%U 1475,1504,1895,1914,1923,1974,2046,2047,2093,2094,2104,2814,2888,2944,3054,3064

%N Starts of runs of 3 consecutive Gray-code Niven numbers (A344341).

%H Amiram Eldar, <a href="/A344343/b344343.txt">Table of n, a(n) for n = 1..10000</a>

%e 1 is a term since 1, 2 and 3 are all Gray-code Niven numbers.

%t gcNivenQ[n_] := Divisible[n, DigitCount[BitXor[n, Floor[n/2]], 2, 1]]; Select[Range[3000], AllTrue[# + {0, 1, 2}, gcNivenQ] &]

%Y Cf. A005811, A014550.

%Y Subsequence of A344341 and A344342.

%Y Subsequences: A344344.

%Y Similar sequences: A154701 (decimal), A328206 (factorial), A328210 (Zeckendorf), A328214 (lazy Fibonacci), A330932 (binary), A331087 (negaFibonacci), A333428 (primorial), A334310 (base phi), A331822 (negabinary), A342428 (base 3/2).

%K nonn,base

%O 1,2

%A _Amiram Eldar_, May 15 2021