A043692 Numbers whose base-3 representation has an even number of runs.

3, 5, 6, 7, 9, 12, 14, 17, 18, 22, 24, 25, 27, 30, 32, 33, 34, 36, 39, 41, 44, 46, 47, 48, 50, 53, 54, 57, 59, 60, 61, 64, 65, 67, 69, 70, 72, 76, 78, 79, 81, 84, 86, 87, 88, 90, 93, 95, 98, 99, 103, 105, 106, 108, 111, 113, 114, 115, 117, 120, 122, 125, 127, 128, 129

Offset

1,1

Links

Paolo Xausa, Table of n, a(n) for n = 1..10000

Mathematica

A043692Q[k_] := EvenQ[Length[Split[IntegerDigits[k, 3]]]];
Select[Range[150], A043692Q] (* Paolo Xausa, Oct 27 2025 *)

Crossrefs

Sequence in context: A230060 A039025 A326675 * A043775 A043778 A043582

Adjacent sequences: A043689 A043690 A043691 * A043693 A043694 A043695

Keyword

nonn,base

Author

Clark Kimberling

Extensions

More terms from Paolo Xausa, Oct 27 2025

Status

approved