A044836 - OEIS

%I #20 Nov 08 2020 23:06:41

%S 11,22,33,44,55,66,77,88,99,1100,1111,1122,1133,1144,1155,1166,1177,

%T 1188,1199,2200,2211,2222,2233,2244,2255,2266,2277,2288,2299,3300,

%U 3311,3322,3333,3344,3355,3366,3377,3388,3399,4400

%N Positive integers having more base-10 runs of even length than odd.

%H Rémy Sigrist, <a href="/A044836/b044836.txt">Table of n, a(n) for n = 1..10000</a>

%o (PARI) is(n,base=10) = { my (v=0); while (n, my (d=n%base, w=0); while (n%base==d, n\=base; w++); v+=(-1)^w); v>0 } \\ _Rémy Sigrist_, Nov 07 2020

%Y Number of even/odd runs: A044941, A044950.  Cf. A044851 (no fewer), A044866 (same number).

%Y Cf. A044828 (binary analog), A338754.

%K nonn,base

%O 1,1

%A _Clark Kimberling_

%E Incorrect formula removed by _Rémy Sigrist_, Nov 07 2020