A044814 Positive integers having distinct base-3 run lengths.

1, 2, 4, 8, 9, 12, 13, 14, 17, 18, 22, 24, 25, 26, 27, 39, 40, 41, 53, 54, 67, 78, 79, 80, 81, 108, 117, 120, 121, 122, 125, 134, 161, 162, 202, 216, 229, 234, 238, 240, 241, 242, 243, 247, 251, 256, 269, 324, 325, 326, 337, 350, 352, 353, 355, 359, 360, 363, 364

Offset

1,2

Links

David A. Corneth, Table of n, a(n) for n = 1..10000

Example

18 = 200_3 is in the sequence as it has distinct runs of same base 3 digits (1, 2). - David A. Corneth, Jan 04 2021

Mathematica

A044814Q[k_] := DuplicateFreeQ[Map[Length, Split[IntegerDigits[k, 3]]]];
Select[Range[500], A044814Q] (* Paolo Xausa, Oct 26 2025 *)

Crossrefs

Cf. A044813, A044814, A044815, A044816, A044817, A044818, A044819, A044820, A044821, A044822, A044823, A044824, A044825, A044826, A044827 (base 2 to base 16).

Sequence in context: A243186 A326673 A297126 * A342009 A304451 A098374

Adjacent sequences: A044811 A044812 A044813 * A044815 A044816 A044817

Keyword

nonn,base

Author

Clark Kimberling

Status

approved