login
Nonprime numbers with distinct decimal digits.
1

%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