(MAGMAMagma) [p:p in PrimesUpTo(1700)| IsPrime(p+4) and NextPrime(p) eq p+4] // Marius A. Burtea, Jan 24 2019
(MAGMAMagma) [p:p in PrimesUpTo(1700)| IsPrime(p+4) and NextPrime(p) eq p+4] // Marius A. Burtea, Jan 24 2019
proposed
approved
editing
proposed
<a href="/index/Pri#gaps">Index entries for primes, gaps between</a>
approved
editing
Marius A. Burtea, <a href="/A029710/b029710_1.txt">Table of n, a(n) for n = 1..14741</a> ( first 1000 terms from R. Zumkeller )
reviewed
approved
proposed
reviewed
editing
proposed
for u=1:length(p)-4
end
sol // _% _Marius A. Burtea_, Jan 24 2019
RMarius A. Zumkeller, Burtea, <a href="/A029710/b029710_1.txt">Table of n, a(n) for n = 1..14741</a> ( first 1000</a> terms from R. Zumkeller )
(MAGMA) [p:p in PrimesUpTo(1700)| IsPrime(p+4) and NextPrime(p) eq p+4] // Marius A. Burtea, Jan 24 2019
(MATLAB)
p=primes(1700); m=1;
for u=1:length(p)-4
if and(isprime(p(u)+4)==1, p(u+1)==p(u)+4); sol(m)=p(u); m=m+1; end
end
sol // Marius A. Burtea, Jan 24 2019
approved
editing