editing
approved
editing
approved
Flatten[Table[ContinuedFraction[Prime[n + 1]/Prime[n]], {n, 30}]] (* _Ray Chandler_, Aug 25 2005 *)
approved
editing
proposed
approved
editing
proposed
If n is in A029707, row n is [1, (prime(n)-1)/2, 2]. - Robert Israel, May 29 2018
seq(op(convert(ithprime(n+1)/ithprime(n), confrac, 'convergents')), n=1..100); # Robert Israel, May 29 2018
nonn,tabf,changed,look
Robert Israel, <a href="/A109374/b109374.txt">Table of n, a(n) for n = 1..10003</a> (rows 1 to 2533, flattened)
seq(op(convert(ithprime(n+1)/ithprime(n), confrac, 'convergents')), n=1..100); # Robert Israel, May 29 2018
approved
editing
__Leroy Quet__, , Aug 24 2005
Definition corrected by __Leroy Quet__, , May 10 2010
__Leroy Quet_, _, Aug 24 2005
Definition corrected by __Leroy Quet_, _, May 10 2010
_Leroy Quet, _, Aug 24 2005
Definition corrected by _Leroy Quet, _, May 10 2010