This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A386340 #12 Jul 19 2025 21:40:55 %S A386340 2,5,7,11,17,19,29,59,61,67,71,79,89,97,101,107,109,127,151,157,167, %T A386340 179,181,191,197,199,211,227,229,251,257,269,271,277,281,509,521,557, %U A386340 569,571,577,587,599,601,607,617,619,659,661,677,691,701,709,719,727,751 %N A386340 Primes without {3, 4} as digits. %H A386340 Jason Bard, <a href="/A386340/b386340.txt">Table of n, a(n) for n = 1..10000</a> %H A386340 <a href="/index/Pri#PrimesWithDigits">Index to entries for primes with digits in a given set</a> %p A386340 f:= n-> (l-> add([$0..2, $5..9][l[j]+1]*10^(j-1), j=1..nops(l)))(convert(n, base, 8)): %p A386340 select(isprime, [seq(f(i), i=0..600)])[]; # _Alois P. Heinz_, Jul 19 2025 %t A386340 Select[Prime[Range[120]], DigitCount[#, 10, 3] == 0 && DigitCount[#, 10, 4] == 0 &] %o A386340 (Magma) [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [0, 1, 2, 5, 6, 7, 8, 9]]; %o A386340 (Python) print(list(islice(primes_with("01256789"), 41))) # uses function/imports in A385776 %o A386340 (PARI) primes_with(, 1, [0, 1, 2, 5, 6, 7, 8, 9]) \\ uses function in A385776 %Y A386340 Intersection of A038611 and A038612. %Y A386340 Cf. A000040, A020461, A380906, A385776. %K A386340 nonn,base,easy %O A386340 1,1 %A A386340 _Jason Bard_, Jul 19 2025