A068691 - OEIS

%I #12 May 02 2016 11:24:02

%S 3,23,223,2003,20021,200003,2000003,20000003,200000069,2000000063,

%T 20000000089,200000000041,2000000000003,20000000000021,

%U 200000000000027,2000000000000021,20000000000000003,200000000000000003,2000000000000000221,20000000000000000401

%N Smallest n-digit prime with all even digits except the least significant digit.

%H Alois P. Heinz, <a href="/A068691/b068691.txt">Table of n, a(n) for n = 1..500</a>

%t evQ[n_]:=And@@EvenQ[Take[x=IntegerDigits[n],Length[x]-1]]; t={3}; Do[i=PrimePi[2*10^n]+1; While[!evQ[p=Prime[i]],i++]; AppendTo[t,p],{n,13}]; t (* _Jayanta Basu_, May 21 2013 *)

%Y Cf. A068690.

%K base,nonn

%O 1,1

%A _Amarnath Murthy_, Mar 03 2002

%E More terms from _Sascha Kurz_, Mar 17 2002