%I #10 Jan 22 2023 13:39:06
%S 1,4,6,8,9,10,12,14,15,16,18,20,21,24,25,26,27,28,30,32,34,35,36,38,
%T 39,40,42,45,46,48,49,50,51,52,54,56,57,58,60,62,63,64,65,68,69,70,72,
%U 74,75,76,78,80,81,82,84,85,86,87,90,91,92,93,94,95,96,98
%N Nonprime numbers with distinct decimal digits.
%C Sequence is finite with 8594603 terms, last term is a(8594603) = 9876543210.
%C Complement of A029743 with respect to A010784.
%H Jaroslav Krizek, <a href="/A210441/b210441.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[100],!PrimeQ[#]&&Max[DigitCount[#]]<2&] (* _Harvey P. Dale_, Jan 22 2023 *)
%Y Cf. A010784 (numbers with distinct decimal digits), A029743 (primes with distinct decimal digits).
%K nonn,base,fini
%O 1,2
%A _Jaroslav Krizek_, Jan 20 2013
