OFFSET
1,2
PROG
(PARI)
default(realprecision, 100); /* large enough */
a(n)=contfracpnqn(contfrac(exp(2/3), n))[1, 1]
vector(30, n, a(n))
CROSSREFS
KEYWORD
frac,nonn
AUTHOR
Benoit Cloitre, Dec 19 2002
STATUS
approved