|
%I #8 Apr 15 2013 09:45:58
%S 10007,10037,10061,10067,10079,10103,10139,10151,10163,10181,10193,
%T 10211,10223,10271,10313,10331,10337,10433,10457,10463,10487,10499,
%U 10601,10607,10613,10631,10691,10709,10733,10739,10853,10859,10883
%N The larger member of a prime pair (p,p+10000).
%H Vincenzo Librandi, <a href="/A165296/b165296.txt">Table of n, a(n) for n = 1..1000</a>
%e a(1) = 7+10000 = 10007. a(2) = 37+10000 = 10037. a(3) = 61+10000 = 10061.
%t Select[Prime[Range[200]] + 10000, PrimeQ] (* _Vincenzo Librandi_, Apr 15 2013 *)
%K nonn,easy
%O 1,1
%A _Vincenzo Librandi_, Sep 14 2009
%E Definition rephrased - _R. J. Mathar_, Sep 16 2009
|
