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 A386336 #8 Jul 19 2025 21:40:14
%S A386336 3,5,7,11,13,17,19,31,37,53,59,61,67,71,73,79,83,89,97,101,103,107,
%T A386336 109,113,131,137,139,151,157,163,167,173,179,181,191,193,197,199,307,
%U A386336 311,313,317,331,337,353,359,367,373,379,383,389,397,503,509,557,563,569
%N A386336 Primes without {2, 4} as digits.
%H A386336 Jason Bard, <a href="/A386336/b386336.txt">Table of n, a(n) for n = 1..10000</a>
%H A386336 <a href="/index/Pri#PrimesWithDigits">Index to entries for primes with digits in a given set</a>
%p A386336 f:= n-> (l-> add([0, 1, 3, $5..9][l[j]+1]*10^(j-1), j=1..nops(l)))(convert(n, base, 8)):
%p A386336 select(isprime, [seq(f(i), i=0..600)])[]; # _Alois P. Heinz_, Jul 19 2025
%t A386336 Select[Prime[Range[120]], DigitCount[#, 10, 2] == 0 && DigitCount[#, 10, 4] == 0 &]
%o A386336 (Magma) [p: p in PrimesUpTo(10^6) | Set(Intseq(p)) subset [0, 1, 3, 5, 6, 7, 8, 9]];
%o A386336 (Python) print(list(islice(primes_with("01356789"), 41))) # uses function/imports in A385776
%o A386336 (PARI) primes_with(, 1, [0, 1, 3, 5, 6, 7, 8, 9]) \\ uses function in A385776
%Y A386336 Intersection of A038604 and A038612.
%Y A386336 Cf. A000040, A361822, A385776.
%K A386336 nonn,base,easy
%O A386336 1,1
%A A386336 _Jason Bard_, Jul 19 2025