login
A039567
Numbers whose base-5 representation has the same number of 0's, 2's and 4's.
1
1, 3, 6, 8, 16, 18, 31, 33, 41, 43, 54, 70, 81, 83, 91, 93, 102, 110, 139, 147, 156, 158, 166, 168, 179, 195, 206, 208, 216, 218, 227, 235, 259, 269, 271, 273, 279, 295, 329, 345, 351, 353, 355, 365, 389, 397, 406, 408, 416, 418, 429, 445, 456, 458, 466, 468
OFFSET
1,2
LINKS
EXAMPLE
54 is a term since 54 in base 10 is 204 in base 5.
MAPLE
filter:= proc(n) local L, q;
L:= convert(n, base, 5);
nops(map(numboccur, {0, 2, 4}, L))=1
end proc:
select(filter, [$1..1000]); # Robert Israel, Apr 09 2018
MATHEMATICA
ok5Q[n_]:=Module[{dc5=DigitCount[n, 5]}, dc5[[2]]==dc5[[4]]==dc5[[5]]]; Select[Range[500], ok5Q] (* Harvey P. Dale, Mar 05 2011 *)
CROSSREFS
KEYWORD
nonn,base,easy
STATUS
approved