A039284 Numbers whose base-5 representation has the same nonzero number of 0's and 2's.
10, 27, 35, 51, 53, 54, 55, 65, 70, 77, 85, 102, 110, 132, 136, 138, 139, 142, 147, 152, 160, 176, 178, 179, 180, 190, 195, 202, 210, 227, 235, 252, 256, 258, 259, 260, 266, 268, 269, 271, 273, 274, 276, 278, 279, 280, 290, 295, 300, 326, 328, 329, 330, 340
Offset: 1
Programs
-
Mathematica
Select[Range[400],DigitCount[#,5,0]==DigitCount[#,5,2]>0&] (* Harvey P. Dale, Oct 03 2014 *)
-
Python
from sympy.ntheory import count_digits def ok(n): c = count_digits(n, b=5); return c[0] == c[2] > 0 print([k for k in range(341) if ok(k)]) # Michael S. Branicky, Oct 27 2021