|
|
A141408
|
|
Primes p = A007947(m) such that p+6 is also prime and p + 1 = A007947(m + 1).
|
|
1
|
|
|
5, 13, 37, 41, 61, 73, 101, 157, 173, 193, 257, 277, 353, 373, 433, 457, 461, 541, 601, 613, 641, 653, 677, 733, 821, 853, 857, 877, 941, 977, 1033, 1117, 1181, 1217, 1297, 1301, 1321, 1361, 1433, 1453, 1481, 1553, 1613, 1621, 1657, 1741, 1753, 1777, 1873, 1901, 1973, 1993
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
a(n)==1 (mod 4).
|
|
LINKS
|
|
|
PROG
|
(PARI) rad(n) = factorback(factorint(n)[, 1]); \\ A007947
lista(nn) = {for (n=1, nn, my(p=rad(n)); if (isprime(p) && isprime(p+6) && (p+1==rad(n+1)), print1(p, ", ")); ); } \\ Michel Marcus, Aug 22 2019
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Definition clarified, more terms appended by R. J. Mathar, Aug 23 2010
A-number typo in definition corrected by R. J. Mathar, Aug 30 2010
|
|
STATUS
|
approved
|
|
|
|