login
A153138
Smallest sequence of odd primes such that no sum of at least two terms is prime
2
3, 5, 7, 83, 317, 383, 29567, 423509, 118661483, 52542428123
OFFSET
1,1
PROG
(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
CROSSREFS
KEYWORD
more,nonn
AUTHOR
Benoit Jubin, Dec 19 2008
EXTENSIONS
a(8)-a(10) from Donovan Johnson, Dec 23 2008
STATUS
approved