login
A038350
Numbers whose base-6 representation has the same nonzero number of 1's and 4's.
0
10, 25, 40, 52, 58, 60, 62, 63, 65, 70, 82, 97, 118, 133, 145, 150, 152, 153, 155, 157, 163, 175, 190, 205, 220, 232, 238, 240, 242, 243, 245, 250, 280, 292, 304, 310, 312, 314, 315, 317, 322, 328, 340, 346, 348, 350, 351, 353, 358, 360, 362, 363, 365, 370
OFFSET
1,1
MATHEMATICA
okQ[n_]:=Module[{dcn6=DigitCount[n, 6]}, dcn6[[1]]==dcn6[[4]]>0]
Select[Range[500], okQ] (* Harvey P. Dale, Feb 18 2011 *)
CROSSREFS
Sequence in context: A014120 A003001 A198377 * A003344 A345853 A047721
KEYWORD
nonn,base,easy
STATUS
approved