id:A070805 - OEIS Search Results

Search: id:A070805

Displaying 1-1 of 1 results found.

page 1

a(1) = 2; a(n) = largest prime not exceeding the sum of all previous terms.

+0
1

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; listen)

	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 this_sequence A103385 A103387 A103388` `Adjacent sequences: A070802 A070803 A070804 this_sequence A070806 A070807 A070808`
	KEYWORD	`nonn`
	AUTHOR	`Labos E. (labos(AT)ana.sote.hu), May 08 2002`

page 1

Search completed in 0.002 seconds

Last modified September 6 16:04 EDT 2008. Contains 143483 sequences.

AT&T Labs Research