|
%I #19 Dec 18 2022 12:25:07
%S 313,3111111111113,311111111111113,3111111111111111111111111111113,
%T 311111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111113
%N Primes in which a string of 1's is sandwiched between two 3's.
%C The next term (a(6)) has 127 digits. - _Harvey P. Dale_, Dec 18 2022
%H Harvey P. Dale, <a href="/A068650/b068650.txt">Table of n, a(n) for n = 1..8</a>
%H Patrick De Geest, <a href="http://www.worldofnumbers.com/deplat.htm#pdp313">PDP Reference Table - 313</a>.
%H Makoto Kamada, <a href="https://stdkmd.net/nrr/3/31113.htm#prime">Prime numbers of the form 311...113</a>.
%H <a href="/index/Pri#Pri_rep">Index entries for primes involving repunits</a>.
%p a := 3:b := 1:i := 1:for n from 0 to 500 do c := a+10*(10^n-1)/9*b+10^(n+1)*a; if(isprime(c)) then d[i] := c; i := i+1; end if; end do:q := seq(d[j],j=1..i-1);
%t Select[Table[10*FromDigits[PadRight[{3},n,1]]+3,{n,2,110}],PrimeQ] (* _Harvey P. Dale_, Dec 18 2022 *)
%Y Cf. A068645-A068651, A056251, A082704.
%K base,nonn
%O 1,1
%A _Amarnath Murthy_, Feb 28 2002
%E More terms from _Sascha Kurz_, Mar 19 2002
%E Edited by _Ray Chandler_, Nov 04 2014
| 