A036936 Smallest n-digit prime containing only digits 1 and 9, or 0 if no such prime exists.

0, 11, 191, 1999, 11119, 111119, 1111991, 11111119, 111111199, 1111111919, 11111111911, 111111199919, 1111111119919, 11111111119111, 111111111119119, 1111111111111999, 11111111111111119, 111111111111191111

Offset

1,2

Links

Jinyuan Wang, Table of n, a(n) for n = 1..500

Mathematica

Table[SelectFirst[FromDigits/@Tuples[{1, 9}, n], PrimeQ], {n, 20}]/. Missing["NotFound"]->0 (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, May 26 2020 *)

Crossrefs

Cf. A020457, A036229, A036309.

Sequence in context: A001408 A298643 A185123 * A002195 A280070 A171553

Adjacent sequences: A036933 A036934 A036935 * A036937 A036938 A036939

Keyword

nonn,base

Author

Patrick De Geest, Jan 04 1999

Status

approved