login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A075574 a(1) = 1, then the smallest number (obviously even) greater than the previous term such that every partial sum is prime. 1
1, 2, 4, 6, 10, 14, 16, 18, 26, 30, 36, 48, 52, 54, 56, 58, 60, 66, 74, 78, 88, 90, 96, 104, 106, 108, 122, 126, 144, 154, 156, 158, 172, 188, 190, 192, 206, 210, 214, 228, 240, 242, 250, 258, 260, 262, 284, 286, 288, 290, 298, 300, 302, 318, 324, 328, 332, 340 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
LINKS
MAPLE
A075574:=proc(n) local i, j, k, t, s; j:=1; s:=1; t:=1; for i to n do k:=s; s:=nextprime(s+j); j:=s-k; t:=t, j; od; t; end; # Floor van Lamoen, Oct 21 2005
MATHEMATICA
nxt[{ps_, a_}]:=Module[{c=a+2}, While[!PrimeQ[ps+c], c+=2]; {ps+c, c}]; Join[ {1}, NestList[nxt, {3, 2}, 60][[All, 2]]] (* Harvey P. Dale, Sep 19 2021 *)
CROSSREFS
Sequence in context: A370654 A213475 A325418 * A104692 A066755 A089238
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Sep 25 2002
EXTENSIONS
More terms from David Wasserman, Jan 20 2005
STATUS
approved

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

License Agreements, Terms of Use, Privacy Policy. .

Last modified April 23 19:56 EDT 2024. Contains 371916 sequences. (Running on oeis4.)