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

1, 2, 4, 8, 13, 26, 30, 32, 33, 34, 40, 46, 47, 48, 50, 57, 59, 60, 61, 64, 65, 69, 70, 80, 84, 86, 87, 88, 90, 93, 95, 98, 99, 103, 105, 106, 111, 113, 114, 115, 121, 127, 128, 129, 131, 136, 137, 139, 143, 144, 147, 149, 152, 154, 155

Offset

1,2

Links

Table of n, a(n) for n=1..55.

Mathematica

Select[Range[200], Mod[Length[Split[IntegerDigits[#, 3]]], 3]==1&] (* Harvey P. Dale, Apr 06 2013 *)

Crossrefs

Sequence in context: A102704 A196720 A212906 * A361818 A043777 A043781

Adjacent sequences: A043771 A043772 A043773 * A043775 A043776 A043777

Keyword

nonn,base

Author

Clark Kimberling

Status

approved