A039563 Numbers whose base-5 representation has the same number of 0's, 1's and 2's.

3, 4, 18, 19, 23, 24, 27, 35, 51, 55, 93, 94, 98, 99, 118, 119, 123, 124, 138, 139, 142, 147, 178, 179, 190, 195, 202, 210, 227, 235, 258, 259, 266, 271, 278, 279, 290, 295, 326, 330, 351, 355, 382, 386, 402, 410, 426, 430, 468, 469, 473, 474, 493, 494, 498

Offset

1,1

Links

Robert Israel, Table of n, a(n) for n = 1..10000

Maple

filter:= proc(n) local L, m;
  L:= sort(select(`<=`, convert(n, base, 5), 2));
  m:= nops(L)/3;
  m::integer and L = [0$m, 1$m, 2$m];
end proc:
select(filter, [$1..1000]); # Robert Israel, Jan 17 2020

Mathematica

Select[Range[500], DigitCount[#, 5, 0]==DigitCount[#, 5, 1] == DigitCount[ #, 5, 2]&] (* Harvey P. Dale, Dec 24 2021 *)

Prog

(Magma) f:=func<n, b, c|Multiplicity(Intseq(n, b), c)>; [k:k in [1..500]|f(k, 5, 0) eq f(k, 5, 1) and f(k, 5, 0) eq f(k, 5, 2)]; // Marius A. Burtea, Jan 17 2020

Crossrefs

Cf. A007091 (numbers in base 5).

Sequence in context: A009208 A296283 A051473 * A032829 A039585 A025118

Adjacent sequences: A039560 A039561 A039562 * A039564 A039565 A039566

Keyword

nonn,base,easy

Author

Olivier Gérard

Status

approved