|
| |
|
|
A078976
|
|
Numerator of n-th convergent to e^(2/3).
|
|
1
| |
|
|
1, 2, 37, 261, 298, 559, 5888, 318511, 5102064, 5420575, 10522639, 205350716, 18492087079, 462507527691, 480999614770, 943507142461, 26899199603678, 3390242657205889, 115295149544603904, 118685392201809793
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
FORMULA
| Special cases : a(5k+1)=A001518(3k); a(5k+3)=A001518(3k+2)
|
|
|
PROG
| (PARI) a(n)=component(component(contfracpnqn(contfrac(exp(2/3), n)), 1), 1) (Warning: this will give only a limited number of correct terms, depending on the precision used. - The Editors, Oct 13 2009).
(PARI, better code)
default(realprecision, 100); /* large enough */
a(n)=contfracpnqn(contfrac(exp(2/3), n))[2, 1]
vector(30, n, a(n))
|
|
|
CROSSREFS
| Cf. A069951, A001518, A007676, A078977.
Sequence in context: A134596 A139119 A053788 * A200911 A001569 A092853
Adjacent sequences: A078973 A078974 A078975 * A078977 A078978 A078979
|
|
|
KEYWORD
| frac,nonn
|
|
|
AUTHOR
| Benoit Cloitre (benoit7848c(AT)orange.fr), Dec 19 2002
|
| |
|
|
