A199329 - OEIS

A199329

Primes having only {0, 1, 9} as digits.

11, 19, 101, 109, 191, 199, 911, 919, 991, 1009, 1019, 1091, 1109, 1901, 1999, 9001, 9011, 9091, 9109, 9199, 9901, 10009, 10091, 10099, 10111, 10909, 11119, 11909, 19001, 19009, 19919, 19991, 90001, 90011, 90019, 90191, 90199, 90901, 90911, 91009, 91019, 91099, 91199, 91909, 99109, 99119, 99191, 99901, 99991

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,1

LINKS

Alois P. Heinz, Table of n, a(n) for n = 1..10000

Index to entries about primes with digits in a given set

MATHEMATICA

Select[FromDigits/@Tuples[{0, 1, 9}, 5], PrimeQ] (* Harvey P. Dale, Dec 10 2016 *)

PROG

(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

CROSSREFS

Cf. A020449 - A020472, A036953, A260044, A260267 - A260271, A199325 - A199327, A061247, A199340 - A199349.

Sequence in context: A385783 A043188 A043968 * A121132 A238332 A089773

Adjacent sequences: A199326 A199327 A199328 * A199330 A199331 A199332

KEYWORD

nonn,base

AUTHOR

M. F. Hasler, Nov 05 2011

STATUS

approved