OFFSET
1,1
COMMENTS
Through terms shown, this is also numbers where every digit present occurs the same number of times (not necessarily consecutively). The first number in this sequence not in that one is 10001.
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
MAPLE
filter:= proc(n)
local L, S;
L:= convert(n, base, 10);
S:= convert(L, set);
min(seq(numboccur(i, L), i=S)) > 1
end proc:
select(filter, [$1..10000]); # Robert Israel, May 28 2014
MATHEMATICA
edQ[n_]:=Min[Select[DigitCount[n], #!=0&]]>1; Select[Range[2100], edQ] (* Harvey P. Dale, Dec 13 2018 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Franklin T. Adams-Watters, Mar 13 2006
STATUS
approved