|
|
A178083
|
|
Numbers k for which 10k+1, 10k+3, 10k+7, 10k+9, 10k+13 and 10k+19 are primes.
|
|
0
|
|
|
1, 148, 16570, 32614, 66109, 102250, 106870, 124636, 146140, 191773, 305887, 415591, 421828, 552700, 834415, 1013440, 1176505, 1190050, 1306432, 1572082, 1576009, 1850437, 1873684, 1912954, 1921144, 2004997, 2103613, 2376340
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
EXAMPLE
|
Associated prime 6-plets are:
11, 13, 17, 19, 23, 29; # from k=1
1481, 1483, 1487, 1489, 1493, 1499; # from k=148
165701, 165703, 165707, 165709, 165713, 165719; # from k=16570
326141, 326143, 326147, 326149, 326153, 326159; # from k=32614
|
|
MATHEMATICA
|
Flatten[Table[If[PrimeQ[10* n + 1] && PrimeQ[10*n + 3] && PrimeQ[10*n + 7] && PrimeQ[10*n + 9] && PrimeQ[10*(n + 1) + 3] && PrimeQ[10*(n + 1) + 9], n, {}], {n, 0, 200000}]]
|
|
PROG
|
(Magma) [n: n in [0..1000]| IsPrime(10*n+1) and IsPrime(10*n+3) and IsPrime(10*n+7) and IsPrime(10*n+9) and IsPrime(10*n+13) and IsPrime(10*n+19)] // Vincenzo Librandi, Nov 30 2010
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|