login
Numbers n such that number of runs in the base 3 representation of n is congruent to 9 mod 10.
1

%I #7 Apr 29 2020 13:55:15

%S 7381,7382,7386,7387,7390,7391,7392,7394,7428,7430,7431,7432,7435,

%T 7436,7440,7441,7462,7463,7467,7468,7471,7472,7473,7475,7482,7484,

%U 7485,7486,7498,7499,7500,7502,7806,7808,7809,7810

%N Numbers n such that number of runs in the base 3 representation of n is congruent to 9 mod 10.

%H Harvey P. Dale, <a href="/A043824/b043824.txt">Table of n, a(n) for n = 1..5000</a>

%t Select[Range[8000],Mod[Length[Split[IntegerDigits[#,3]]],10]==9&] (* _Harvey P. Dale_, Apr 29 2020 *)

%K nonn,base

%O 1,1

%A _Clark Kimberling_