%I #4 Oct 15 2013 22:32:35
%S 2,11,89,907,8893,88897,888917,8888927,88888901,888888901,8888888891,
%T 88888888901,888888888919,8888888888921,88888888888889,
%U 888888888888907,8888888888888927,88888888888888889,888888888888888947
%N a(n) is the least prime following A002282[n] repdigits.
%e n=8: 88 is followed by 89.
%t Table[Table[NextPrime[8*(10^n-1)/9], {n, 0, 35}]
%Y Cf. A003618, A003617, A096497, A096498, A068104, A002275-A002283, A099656-A099668.
%K base,nonn
%O 0,1
%A _Labos Elemer_, Nov 17 2004