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 A199329 #19 Jul 14 2025 17:26:19 %S A199329 11,19,101,109,191,199,911,919,991,1009,1019,1091,1109,1901,1999,9001, %T A199329 9011,9091,9109,9199,9901,10009,10091,10099,10111,10909,11119,11909, %U A199329 19001,19009,19919,19991,90001,90011,90019,90191,90199,90901,90911,91009,91019,91099,91199,91909,99109,99119,99191,99901,99991 %N A199329 Primes having only {0, 1, 9} as digits. %H A199329 Alois P. Heinz, <a href="/A199329/b199329.txt">Table of n, a(n) for n = 1..10000</a> %H A199329 <a href="/index/Pri#PrimesWithDigits">Index to entries about primes with digits in a given set</a> %t A199329 Select[FromDigits/@Tuples[{0,1,9},5],PrimeQ] (* _Harvey P. Dale_, Dec 10 2016 *) %o A199329 (PARI) A199329(n=50,show=0,L=[0,1,9])={for(d=1,1e9,my(t,u=vector(d,i,10^(d-i))~);forvec(v=vector(d,i,[1+!(L[1]||(i>1&&i<d)),#L]),ispseudoprime(t=vecextract(L,v)*u)||next;show&&print1(t",");n--||return(t)))} \\ Syntax updated for newer PARI versions by _M. F. Hasler_, Jul 25 2015 %Y A199329 Cf. A020449 - A020472, A036953, A260044, A260267 - A260271, A199325 - A199327, A061247, A199340 - A199349. %K A199329 nonn,base %O A199329 1,1 %A A199329 _M. F. Hasler_, Nov 05 2011