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

Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A070805 a(1) = 2; a(n) = largest prime not exceeding the sum of all previous terms. 0
2, 3, 5, 7, 17, 31, 61, 113, 239, 467, 941, 1879, 3761, 7523, 15031, 30071, 60149, 120299, 240599, 481181, 962363, 1924721, 3849437, 7698893, 15397783, 30795571, 61591147, 123182281, 246364571, 492729101, 985458239, 1970916449 (list; graph; refs; listen; history; internal format)
OFFSET

1,1

MATHEMATICA

tb[0]={} tb[x_] := Union[tb[x-1], m[x]] m[x_] := {Prime[PrimePi[Apply[Plus, tb[x-1]]]]} Union[Delete[Flatten[Table[m[w], {w, 1, 20}]], 1], {2}]

CROSSREFS

Cf. A070218.

Sequence in context: A030480 A048418 A074788 * A103385 A103389 A103387

Adjacent sequences:  A070802 A070803 A070804 * A070806 A070807 A070808

KEYWORD

nonn

AUTHOR

Labos E. (labos(AT)ana.sote.hu), May 08 2002

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Transforms | Puzzles | Hot | Classics
Recent Additions | More pages | Superseeker | Maintained by The OEIS Foundation Inc.

Content is available under The OEIS End-User License Agreement .

Last modified February 13 10:53 EST 2012. Contains 205459 sequences.