A141076 - OEIS

%I #17 Mar 04 2014 23:51:26

%S 13,17,23,29,37,41,43,59,67,71,73,89,97,103,107,131,149,157,167,173,

%T 179,181,197,199,211,223,227,229,241,257,271,281,283,293,307,311,313,

%U 317,331,337,359,379,397,409,421,431,433,439,443,449,463,479,487,499

%N Primes of form 2*3*5*7*11 - p, where p is prime.

%C The final member of the sequence is a(228) = 2297. - _Charles R Greathouse IV_, Mar 26 2010

%C This sequence can also be defined as the numbers in the prime partitions of 2310 into two parts ({13, 2297}, {17, 2293}, {23, 2287}, etc.). - _Alonso del Arte_, Feb 14 2013

%H Nathaniel Johnston, <a href="/A141076/b141076.txt">Table of n, a(n) for n = 1..228</a> (full sequence)

%F a(n) + a(229-n) = 2*3*5*7*11.

%p l:=[]: p:=2: while p<=2310 do if(isprime(2310-p))then l:=[op(l),p]: fi: p:=nextprime(p): od: op(l); # _Nathaniel Johnston_, Jun 23 2011

%t Select[Table[2310 - Prime[p], {p, PrimePi[2310], 1, -1}], PrimeQ] (* _Alonso del Arte_, Feb 14 2013 *)

%K nonn,fini,full,easy,less

%O 1,1

%A _Juri-Stepan Gerasimov_, Aug 05 2008