%I #6 Dec 12 2021 15:30:20
%S 2,11,79,787,7789,77783,777781,7777801,77777803,777777799,7777777781,
%T 77777777827,777777777841,7777777777859,77777777777837,
%U 777777777777787,7777777777777867,77777777777777797,777777777777777817
%N a(n) is the least prime following A002281[n] repdigits.
%e n=6: 77 is followed by 79.
%t Table[Table[NextPrime[7*(10^n-1)/9], {n, 0, 35}]
%t NextPrime/@LinearRecurrence[{11,-10},{0,7},35] (* _Harvey P. Dale_, Dec 12 2021 *)
%Y Cf. A003618, A003617, A096497, A096498, A068104, A002275-A002283, A099656-A099668.
%K base,nonn
%O 0,1
%A _Labos Elemer_, Nov 17 2004