login
A031491
Numbers whose base-8 representation has 2 fewer 0's than 7's.
0
63, 127, 191, 255, 319, 383, 447, 463, 471, 479, 487, 495, 503, 505, 506, 507, 508, 509, 510, 639, 703, 767, 831, 895, 959, 975, 983, 991, 999, 1007, 1015, 1017, 1018, 1019, 1020, 1021, 1022
OFFSET
1,1
MATHEMATICA
Select[Range[1100], DigitCount[#, 8, 7]==DigitCount[#, 8, 0]+2&] (* Harvey P. Dale, Mar 31 2018 *)
CROSSREFS
Cf. A007094.
Sequence in context: A031468 A045064 A043450 * A044250 A044631 A045136
KEYWORD
nonn,base
STATUS
approved