A044824 Positive integers having distinct base-13 run lengths.

1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 14, 28, 42, 56, 70, 84, 98, 112, 126, 140, 154, 168, 169, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, 192, 193, 194, 197, 211, 225, 239, 253, 267, 281, 295, 309, 323, 337, 338, 352, 364, 365, 366, 367, 368, 369, 370, 371

Offset: 1

Author

Clark Kimberling

Keywords

• nonn
• base

Examples

			338 = 200_13 is in the sequence as it has distinct run lengths of distinct digits (2, 1). - _David A. Corneth_, Jan 04 2021
		

Links

• David A. Corneth, Table of n, a(n) for n = 1..10000 (first 1000 terms from Harvey P. Dale)

Crossrefs

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

Programs

Mathematica

Select[Range[400],Union[Tally[Length/@Split[IntegerDigits[#,13]]][[All,2]]] == {1}&] (* Harvey P. Dale, Sep 15 2020 *)