%I #12 Jul 04 2022 04:44:22
%S 0,2,4,6,8,20,22,24,26,28,40,42,44,46,48,60,62,64,66,68,80,82,84,86,
%T 88,100,102,104,106,108,120,122,124,126,128,140,142,144,146,148,160,
%U 162,164,166,168,180,182,184,186,188,200,201,202,203,204,205,206,207,208,209,210,212
%N Numbers having more even than odd digits when written in base 10.
%o (PARI) select( {is_A352546(n)=vecsum(n=digits(n)%2)*2<#n+!n}, [0..222])
%o (Python)
%o def ok(n): return len(s:=str(n)) < 2*sum(1 for c in s if c in "02468")
%o print([k for k in range(213) if ok(k)]) # _Michael S. Branicky_, Jul 03 2022
%Y Cf. A196563, A196564.
%Y Cf. A072603 (same in base 2).
%Y Cf. A117076 (subsequence of primes).
%Y Cf. A352547 (numbers having more odd than even decimal digits).
%K nonn,base
%O 1,2
%A _M. F. Hasler_, Jul 03 2022
|