[go: up one dir, main page]

login
A292730
Numbers in which 0 outnumbers all other digits together.
18
0, 100, 200, 300, 400, 500, 600, 700, 800, 900, 1000, 2000, 3000, 4000, 5000, 6000, 7000, 8000, 9000, 10000, 10001, 10002, 10003, 10004, 10005, 10006, 10007, 10008, 10009, 10010, 10020, 10030, 10040, 10050, 10060, 10070, 10080, 10090, 10100, 10200, 10300, 10400, 10500, 10600, 10700, 10800, 10900, 11000
OFFSET
1,2
COMMENTS
Subset of A292450.
Numbers n such that A055641(n) > (A055642(n)/2). - Felix Fröhlich, Sep 22 2017
Also numbers whose median of the digits is equal to 0. - Stefano Spezia, Oct 04 2023
EXAMPLE
100 has more 0's than any other digit, whereas both 1001 and 1002 have as many other digits as 0's.
MATHEMATICA
Select[Range[0, 11000], Total@ #1 < First@ #2 & @@ TakeDrop[DigitCount@ #, 9] &] (* Michael De Vlieger, Sep 22 2017 *)
PROG
(PARI) a055641(n)=if(n, n=digits(n); sum(i=2, #n, n[i]==0), 1) \\ after Charles R Greathouse IV
is(n) = a055641(n) > (#Str(n)/2) \\ Felix Fröhlich, Sep 22 2017
KEYWORD
nonn,base,easy
AUTHOR
Halfdan Skjerning, Sep 22 2017
STATUS
approved