login
Primes that contain only the digits (0, 3, 8).
1

%I #13 Sep 08 2022 08:46:13

%S 3,83,383,883,3083,3803,3833,8803,30803,33083,38083,38303,38333,38803,

%T 38833,80803,80833,83003,83383,83833,88003,88883,303803,308003,308303,

%U 308333,308383,330383,333383,333803,338033,338383,338803,380333,380383,380803,383083

%N Primes that contain only the digits (0, 3, 8).

%C A020464 is a subsequence.

%H Alois P. Heinz, <a href="/A261434/b261434.txt">Table of n, a(n) for n = 1..10000</a>

%t Select[Prime[Range[2 10^5]], Complement[IntegerDigits[#], {0, 3, 8}] == {} &]

%t Select[FromDigits/@Tuples[{0,3,8},6],PrimeQ] (* _Harvey P. Dale_, Jul 10 2017 *)

%o (Magma) [p: p in PrimesUpTo(2*10^6) | Set(Intseq(p)) subset [0, 3, 8]];

%Y Cf. Primes that contain only the digits (0,3,k): A260044 (k=1), A260125 (k=2), A199340 (k=4), A260223 (k=5), A260378 (k=7), this sequence (k=8).

%Y Cf. A000040, A020464.

%K nonn,easy,base

%O 1,1

%A _Vincenzo Librandi_, Aug 18 2015