A153138 Smallest sequence of odd primes such that no sum of at least two terms is prime.
3, 5, 7, 83, 317, 383, 29567, 423509, 118661483, 52542428123
Offset: 1
Programs
-
PARI
a=[]; for(n=1, 10, forprime(p=if(a,a[#a]+2,3), , setsearch(a, p)&&next; for(i=1, 2^#a-1, isprime(normlp(vecextract(a, i), 1)+p)&&next(2)); a=concat(a, p); print1(p", "))) \\ Very simplistic, should at least avoid an odd number of terms in the partial sum of earlier terms. \\ M. F. Hasler, Jan 29 2015
Extensions
a(8)-a(10) from Donovan Johnson, Dec 23 2008