A043695 -id:A043695 - cp's OEIS frontend

A043703 Numbers whose base-14 representation has an even number of runs.

14, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 76, 77, 78

Offset: 1

Clark Kimberling

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

Cf. A299174, A043692, A043693, A043694, A043695, A043696, A043697, A043698, A043700, A043701, A043702, A043703, A043704, A043705.

Cf. A043717 (complement).

Select[Range[80],EvenQ[Length[Split[IntegerDigits[#,14]]]]&] (* Harvey P. Dale, Aug 30 2020 *)

is(n) = qstreaks(n)%2 == 0
qstreaks(n, {b = 14}) = {my(d = digits(n, b)); sum(i = 2, #d, d[i]!=d[i-1])+1} \\ David A. Corneth, Aug 31 2020

A043610 Numbers whose base-6 representation has exactly 2 runs.

Original entry on oeis.org

6, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 19, 20, 22, 23, 24, 25, 26, 27, 29, 30, 31, 32, 33, 34, 36, 42, 44, 45, 46, 47, 50, 57, 64, 71, 72, 79, 84, 85, 87, 88, 89, 93, 100, 107, 108, 115, 122, 126, 127, 128, 130, 131, 136, 143, 144, 151

Offset: 1

Clark Kimberling

Cf. A007092.

Subsequence of A043695.

Select[Range[200],Length[Split[IntegerDigits[#,6]]]==2&] (* Harvey P. Dale, Nov 18 2023 *)

A048303 Numbers whose base-6 expansions, read from left to right, have run lengths that strictly increase.

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 7, 14, 21, 28, 35, 36, 43, 50, 57, 64, 71, 72, 79, 86, 93, 100, 107, 108, 115, 122, 129, 136, 143, 144, 151, 158, 165, 172, 179, 180, 187, 194, 201, 208, 215, 216, 259, 302, 345, 388, 431, 432, 475, 518, 561, 604, 647, 648, 691, 734, 777, 820

Offset: 0

Patrick De Geest, Feb 15 1999

Cf. A037015, A043695, A043709, A044817, A044955.

Select[Range[0,900],Min[Differences[Length/@Split[IntegerDigits[ #,6]]]]> 0&] (* Harvey P. Dale, Jan 14 2014 *)

A048317 Numbers whose base-6 expansions, read from left to right, have run lengths that strictly decrease.

Original entry on oeis.org

0, 1, 2, 3, 4, 5, 7, 14, 21, 28, 35, 42, 43, 44, 45, 46, 47, 84, 85, 86, 87, 88, 89, 126, 127, 128, 129, 130, 131, 168, 169, 170, 171, 172, 173, 210, 211, 212, 213, 214, 215, 258, 259, 260, 261, 262, 263, 516, 517, 518, 519, 520, 521, 774, 775, 776, 777, 778, 779

Offset: 0

Patrick De Geest, Feb 15 1999

Cf. A037013, A043695, A043709, A044817, A044955.

Select[Range[0,800],Max[Differences[Length/@Split[IntegerDigits[ #,6]]]]<0&] (* Harvey P. Dale, Jul 30 2019 *)

cp's OEIS Frontend

A043703 Numbers whose base-14 representation has an even number of runs.

Views

Author

Keywords

Links

Crossrefs

Programs

Mathematica

PARI

A043610 Numbers whose base-6 representation has exactly 2 runs.

Views

Author

Keywords

Crossrefs

Programs

Mathematica

A048303 Numbers whose base-6 expansions, read from left to right, have run lengths that strictly increase.

Views

Author

Keywords

Crossrefs

Programs

Mathematica

A048317 Numbers whose base-6 expansions, read from left to right, have run lengths that strictly decrease.

Views

Author

Keywords

Crossrefs

Programs

Mathematica