

A182040


Integers whose decimal representation consists of three distinct digits, one appearing once, one appearing twice, and one appearing three times.


6



100012, 100013, 100014, 100015, 100016, 100017, 100018, 100019, 100021, 100022, 100031, 100033, 100041, 100044, 100051, 100055, 100061, 100066, 100071, 100077, 100081, 100088, 100091, 100099, 100102, 100103, 100104, 100105, 100106, 100107, 100108, 100109, 100112
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

There are 38880 terms, including 41 squares (A182098) and 3640 primes (A182092).  Zak Seidov, Apr 12 2012
This is the subsequence of A218556 consisting of terms with indices n = 254, ..., 39133. The number of terms is 38880 = A218566(10,3), the starting index is 254 = 1 + A218566(10,1) + A218566(10,2) + 1.  M. F. Hasler, Nov 02 2012


LINKS

Charles R Greathouse IV, Table of n, a(n) for n = 1..38880 (complete sequence)


MATHEMATICA

t = Select[Range[100000, 999999], Sort[Transpose[Tally[IntegerDigits[#]]][[2]]] == {1, 2, 3} &]; Take[t, 32] (* T. D. Noe, Apr 11 2012 *)


PROG

(PARI) is(n)=n=vecsort(eval(Vec(Str(n)))); vecsort(apply(k>sum(i=1, #n, n[i]==k), vecsort(n, , 8)))==[1, 2, 3] \\ Charles R Greathouse IV, Apr 11 2012


CROSSREFS

Cf. A071925, A181986 (digitally balanced numbers: ternary numbers which have the same number of 0's as 1's as 2's), A182051 (primes with a majority of one digit).
Sequence in context: A210761 A165297 A237233 * A120216 A119902 A182092
Adjacent sequences: A182037 A182038 A182039 * A182041 A182042 A182043


KEYWORD

nonn,base,fini,full,easy


AUTHOR

Jonathan Vos Post, Apr 09 2012


STATUS

approved



