A045192 Numbers whose base-5 representation contains exactly one 0 and one 3.
15, 28, 40, 53, 65, 76, 77, 79, 80, 85, 95, 103, 115, 133, 138, 141, 142, 144, 148, 153, 165, 178, 190, 201, 202, 204, 205, 210, 220, 228, 240, 258, 263, 266, 267, 269, 273, 278, 290, 303, 315, 326, 327, 329, 330, 335, 345, 353
Offset: 1
Crossrefs
Cf. A007091.
Programs
-
Mathematica
Select[Range[400],DigitCount[#,5,0]==DigitCount[#,5,3]==1&] (* Harvey P. Dale, Feb 20 2020 *)
Comments