This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A043703 #25 Jun 18 2021 22:36:57 %S A043703 14,16,17,18,19,20,21,22,23,24,25,26,27,28,29,31,32,33,34,35,36,37,38, %T A043703 39,40,41,42,43,44,46,47,48,49,50,51,52,53,54,55,56,57,58,59,61,62,63, %U A043703 64,65,66,67,68,69,70,71,72,73,74,76,77,78 %N A043703 Numbers whose base-14 representation has an even number of runs. %H A043703 David A. Corneth, <a href="/A043703/b043703.txt">Table of n, a(n) for n = 1..10000</a> %t A043703 Select[Range[80],EvenQ[Length[Split[IntegerDigits[#,14]]]]&] (* _Harvey P. Dale_, Aug 30 2020 *) %o A043703 (PARI) is(n) = qstreaks(n)%2 == 0 %o A043703 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 %Y A043703 Cf. A299174, A043692, A043693, A043694, A043695, A043696, A043697, A043698, A043700, A043701, A043702, A043703, A043704, A043705. %Y A043703 Cf. A043717 (complement). %K A043703 nonn,easy,base %O A043703 1,1 %A A043703 _Clark Kimberling_