A091852 Numerator of Sum_{i=1..n} prime(i)/prime(i+1).

2, 19, 208, 3023, 52004, 1079263, 24845332, 663589691, 21809669044, 769910292199, 31595368408378, 1432693760237483, 67842962092519574, 3469898586979325623, 198354535000733806154, 12566530264688830748431

Offset

1,1

Comments

Proposed by Mohammed BOUAYOUN, Feb 16 2004; computed by R. K. Guy, Feb 17 2004

Links

Table of n, a(n) for n=1..16.

Example

The sums are f(1)=2/3, f(2)=2/3 + 3/5, f(3)=2/3+3/5+5/7, f(4)=2/3+3/5+5/7+7/11, ...

Mathematica

A091852[n_] := Numerator[ Sum[ Prime[i] / Prime[i + 1], {i, n}]]; Table[ A091852[n], {n, 16}] (* Robert G. Wilson v, Mar 16 2004 *)

Crossrefs

Denominators are in A070826.

Sequence in context: A037071 A126039 A349256 * A210986 A232525 A024227

Adjacent sequences: A091849 A091850 A091851 * A091853 A091854 A091855

Keyword

nonn,frac

Author

N. J. A. Sloane, Mar 13 2004

Extensions

More terms from Robert G. Wilson v, Mar 16 2004

Status

approved