Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #13 Mar 09 2020 09:12:53
%S 3,43,433,3343,33343,333433,3333433,34333333,333334333,3333334343,
%T 33333333343,333333343333,3333333333433,33333333433333,
%U 333333333334343,3333333333333343,33333333333433433,333333333333334343
%N Smallest n-digit prime containing only digits 3 and 4, or 0 if no such prime exists.
%H Jinyuan Wang, <a href="/A036940/b036940.txt">Table of n, a(n) for n = 1..500</a>
%t Table[SelectFirst[FromDigits/@Tuples[{3,4},n],PrimeQ],{n,18}] (* The program uses the SelectFirst function from Mathematica version 10 *) (* _Harvey P. Dale_, May 29 2015 *)
%Y Cf. A020461, A036229, A036314.
%K nonn,base
%O 1,1
%A _Patrick De Geest_, Jan 04 1999