|
%I #15 Mar 04 2014 23:51:12
%S 1,169,221,247,299,323,361,377,403,437,527,533,551,589,611,689,697,
%T 703,713,731,767,779,799,817,851,871,901,943,949,989,1003,1007,1027,
%U 1073,1079,1081,1139,1147,1157,1159,1207,1219,1241,1247,1261,1271,1313,1333
%N Nonprimes of form (2*3*5*7*11-p), where p is prime.
%C The final member of the sequence is a(115) = 2308.
%H Nathaniel Johnston, <a href="/A141075/b141075.txt">Table of n, a(n) for n = 1..115</a> (full sequence)
%e a(1) = 2*3*5*7*11 - 2309 = 1; a(2) = 2*3*5*7*11 - 2141 = 169.
%p a:=proc(n) if(isprime(n) and not isprime(2310-n))then 2310-n fi end: seq(a(2310-n),n=1..2309); # _Nathaniel Johnston_, Jun 08 2011
%t Sort[2310-#&/@Select[Prime[Range[343]],!PrimeQ[2310-#]&]] (* _Harvey P. Dale_, Jul 26 2011 *)
%K nonn,fini,full,easy,less
%O 1,2
%A _Juri-Stepan Gerasimov_, Aug 05 2008
%E Comment and more terms from _Charles R Greathouse IV_, Mar 26 2010
|
