|
|
A093672
|
|
Primes of the form (7 * 10^k - 1)/3.
|
|
5
|
|
|
2, 23, 233, 2333, 23333, 23333333333, 23333333333333333, 23333333333333333333333, 233333333333333333333333333333333333333333333333333333, 23333333333333333333333333333333333333333333333333333333333333333333333333333333333333333333
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
FORMULA
|
Primes of the form 2 * 10^k + 3 * R_k, where R_k is the repunit (A002275) of length k.
|
|
MAPLE
|
select(isprime, [seq(7*10^k-1)/3, k=0..100)]): # Robert Israel, Aug 07 2014
|
|
MATHEMATICA
|
Select[(7 * 10^Range[0, 19] - 1)/3, PrimeQ] (* Alonso del Arte, Aug 07 2014 *)
Select[Table[FromDigits[PadRight[{2}, n, 3]], {n, 100}], PrimeQ] (* Harvey P. Dale, Oct 04 2015 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|