login
Numbers whose number of runs in base 3 is congruent to 5 (mod 7).
0

%I #11 Aug 14 2021 18:53:40

%S 91,92,96,97,100,101,102,104,138,140,141,142,145,146,150,151,172,173,

%T 177,178,181,182,183,185,192,194,195,196,208,209,210,212,253,254,258,

%U 259,262,263,264,266,271,272,274,278,280,281

%N Numbers whose number of runs in base 3 is congruent to 5 (mod 7).

%t Select[Range[300],Mod[Length[Split[IntegerDigits[#,3]]],7]==5&] (* _Harvey P. Dale_, Jan 13 2019 *)

%Y Cf. A007089.

%K nonn,base

%O 1,1

%A _Clark Kimberling_