|
|
A068650
|
|
Primes in which a string of 1's is sandwiched between two 3's.
|
|
5
|
|
|
313, 3111111111113, 311111111111113, 3111111111111111111111111111113, 311111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111111113
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MAPLE
|
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);
|
|
MATHEMATICA
|
Select[Table[10*FromDigits[PadRight[{3}, n, 1]]+3, {n, 2, 110}], PrimeQ] (* Harvey P. Dale, Dec 18 2022 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|