|
%I #18 Jul 01 2018 17:54:39
%S 2,5,7,9,10,15,16,17,24,26,28,30,32,35,40,41,43,49,51,55,56,60,66,69,
%T 72,76,77,87,94,98,102,103,104,108,116,120,123,124,126,128,135,137,
%U 140,144,148,154,160,161,164,166,170,171,185,190,192,194,195,201,206,220
%N Numbers k such that prime(k)+50 is also prime.
%C "Numerical evidence makes it plausible that there are infinitely many primes p such that p + 50 is also prime." - Burton, p. 52.
%D D. M. Burton, Elementary Number Theory, Allyn and Bacon, Inc., Boston, MA, 1976, pp. 52.
%H Harry J. Smith, <a href="/A062288/b062288.txt">Table of n, a(n) for n = 1..1000</a>
%t Select[Range[400],PrimeQ[Prime[#]+50]&] (* _Harvey P. Dale_, Mar 01 2011 *)
%o (PARI) for(n=1,65, if(isprime(prime(n)+50),print(n)))
%o (PARI) { n=m=0; forprime (p=2, 10^5, m++; if (isprime(p + 50), write("b062288.txt", n++, " ", m); if (n==1000, break)) ) } \\ _Harry J. Smith_, Aug 04 2009
%Y Cf. A062284.
%K easy,nonn
%O 1,1
%A _Jason Earls_, Jul 02 2001
%E More terms from Larry Reeves (larryr(AT)acm.org), Jul 05 2001
|
