login
A039297
Numbers whose base-6 representation has the same nonzero number of 0's and 5's.
0
30, 41, 66, 77, 102, 113, 138, 149, 174, 181, 182, 183, 184, 186, 192, 198, 204, 227, 233, 239, 245, 247, 248, 249, 250, 257, 282, 293, 318, 329, 354, 365, 390, 397, 398, 399, 400, 402, 408, 414, 420, 443, 449, 455, 461, 463, 464, 465, 466, 473, 498, 509
OFFSET
1,1
MATHEMATICA
ok6Q[n_]:=Module[{dc6=DigitCount[n, 6]}, dc6[[5]]==dc6[[6]]>0]; Select[Range[ 550], ok6Q] (* Harvey P. Dale, Mar 05 2011 *)
Select[Range[600], DigitCount[#, 6, 0]==DigitCount[#, 6, 5]>0&] (* Harvey P. Dale, Mar 12 2023 *)
CROSSREFS
Cf. A007092.
Sequence in context: A275193 A225049 A043120 * A043900 A103098 A110849
KEYWORD
nonn,base,easy
STATUS
approved