%I #7 Sep 20 2022 19:26:53
%S 3,5,6,7,9,12,14,17,18,22,24,25,27,36,39,41,44,53,54,67,72,76,78,79,
%T 81,108,117,120,122,125,134,161,162,202,216,229,234,238,240,241,243,
%U 324,351,360,363,365,368,377,404,485,486,607,648
%N Numbers n such that number of runs in base 3 representation of n is congruent to 2 mod 9.
%t Select[Range[700],Mod[Length[Split[IntegerDigits[#,3]]],9]==2&] (* _Harvey P. Dale_, Sep 20 2022 *)
%K nonn,base
%O 1,1
%A _Clark Kimberling_