login
This site is supported by donations to The OEIS Foundation.

 

Logo


Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A073659 a(1) = 1; for n > 1, a(n) = smallest even number not already in sequence such a(1) + ... + a(n) is a prime. 8
1, 2, 4, 6, 10, 8, 12, 16, 14, 24, 30, 22, 18, 26, 34, 36, 20, 28, 38, 40, 32, 42, 46, 48, 44, 52, 56, 60, 54, 58, 66, 50, 64, 62, 70, 84, 90, 72, 92, 76, 86, 94, 74, 88, 68, 82, 80, 102, 96, 100, 114, 98, 78, 112, 120, 110, 108, 106, 126, 122, 130, 132, 134, 124, 128, 118 (list; graph; refs; listen; history; text; internal format)
OFFSET

1,2

COMMENTS

Essentially the same as A054408. [R. J. Mathar, Dec 15 2008]

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..4097 from N. J. A. Sloane).

MATHEMATICA

t = {1}; Do[i = 2; While[! PrimeQ[Total[t] + i] || MemberQ[t, i], i += 2]; AppendTo[t, i], {65}]; t (* Jayanta Basu, Jul 04 2013 *)

PROG

(PARI) v=[1]; n=1; while(n<200, if(isprime(n+vecsum(v))&&!vecsearch(vecsort(v), n), v=concat(v, n); n=0); n++); v \\ Derek Orr, Jun 01 2015

CROSSREFS

Cf. A054408, A073660.

See A055265 for a version where the sums of two adjacent terms are primes.

Sequence in context: A227526 A093081 A242521 * A073661 A079052 A243502

Adjacent sequences:  A073656 A073657 A073658 * A073660 A073661 A073662

KEYWORD

nonn,easy

AUTHOR

Amarnath Murthy, Aug 10 2002

EXTENSIONS

More terms from Sascha Kurz, Jan 28 2003

Offset corrected by Chai Wah Wu, Aug 27 2017

STATUS

approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 22 11:46 EDT 2019. Contains 322330 sequences. (Running on oeis4.)