login
Starts of runs of 3 consecutive Niven numbers in base 3/2 (A342426).
16

%I #9 Mar 12 2021 03:34:31

%S 2196,7656,15624,16335,64375,109224,171624,202824,328887,329427,

%T 392733,393640,447578,482238,494450,520695,631824,723519,773790,

%U 785695,820960,876987,981783,986607,1021824,1026750,1030455,1084048,1108094,1160670,1235070,1242824,1412908

%N Starts of runs of 3 consecutive Niven numbers in base 3/2 (A342426).

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

%e 2196 is a term since 2196, 2197 and 2198 are all Niven numbers in base 3/2.

%t s[0] = 0; s[n_] := s[n] = s[2*Floor[n/3]] + Mod[n, 3]; q[n_] := Divisible[n, s[n]]; Select[Range[10^6], AllTrue[# + {0, 1, 2}, q] &]

%Y Subsequence of A342426 and A342427.

%Y Subsequences: A342429.

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

%K nonn,base

%O 1,1

%A _Amiram Eldar_, Mar 11 2021