OFFSET
1,1
LINKS
Robert Israel, Table of n, a(n) for n = 1..10000
EXAMPLE
Prime(6)/prime(5) = 13/11 = 1 + 1/(5 + 1/2), so a(5) = 1+5+2 = 8.
MAPLE
seq(convert(numtheory:-cfrac(ithprime(n+1)/ithprime(n), quotients), `+`), n=1..100); # Robert Israel, Jul 11 2017
MATHEMATICA
Table[Plus @@ ContinuedFraction[Prime[n + 1]/Prime[n]], {n, 70}]
PROG
(PARI) a(n) = vecsum(contfrac(prime(n+1)/prime(n))); \\ Michel Marcus, Jul 12 2017
CROSSREFS
KEYWORD
nonn,look
AUTHOR
Ray Chandler, Sep 18 2005
STATUS
approved