OFFSET
1,1
COMMENTS
1 is the only odd number in this sequence. - Derek Orr, Feb 07 2015
Conjecture: Every even numbers appears. - N. J. A. Sloane, May 29 2017
LINKS
Chai Wah Wu, Table of n, a(n) for n = 1..10000 (terms n = 1..4100 from N. J. A. Sloane).
MATHEMATICA
t = {2}; Do[i = 1; While[! PrimeQ[Total[t] + i] || MemberQ[t, i], i++]; AppendTo[t, i], {65}]; t (* Jayanta Basu, Jul 04 2013 *)
PROG
(PARI) v=[2]; n=1; while(n<100, if(isprime(vecsum(v)+n)&&!vecsearch(vecsort(v), n), v=concat(v, n); n=0); n++); v \\ Derek Orr, Feb 07 2015
(Python)
from sympy import isprime
def aupton(terms):
alst, aset, asum = [], set(), 0
while len(alst) < terms:
an = 1
while True:
while an in aset: an += 1
if isprime(asum + an):
alst, aset, asum = alst + [an], aset | {an}, asum + an
break
an += 1
return alst
print(aupton(66)) # Michael S. Branicky, Jun 05 2021
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Henry Bottomley, May 09 2000
STATUS
approved