|
|
A031499
|
|
Numbers whose base-10 representation has one fewer 0 than 9's.
|
|
0
|
|
|
9, 19, 29, 39, 49, 59, 69, 79, 89, 91, 92, 93, 94, 95, 96, 97, 98, 119, 129, 139, 149, 159, 169, 179, 189, 191, 192, 193, 194, 195, 196, 197, 198, 219, 229, 239, 249, 259, 269, 279, 289, 291, 292, 293, 294, 295, 296, 297, 298, 319
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
Select[Range@400, (s=#; Differences[Count[IntegerDigits[s], #]&/@{0, 9}]=={1})&] (* Giorgos Kalogeropoulos, Jul 04 2021 *)
Select[Range[400], DigitCount[#, 10, 0]+1==DigitCount[#, 10, 9]&] (* Harvey P. Dale, Feb 06 2023 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|