OFFSET
1,1
COMMENTS
FORMULA
a(n) = a(n-1)^2 - 2 for n>3.
For n>3, a(n) = (sqrt(5)+2)^(2^(n-2)) + (sqrt(5)-2)^(2^(n-2)). - Vaclav Kotesovec, Sep 20 2013
a(n) = 2*A081459(n-1) for n>3. - Amiram Eldar, Apr 07 2023
EXAMPLE
phi = 1+1/2*(1+1/4*(1-1/18*(1+1/322*(1+1/103682*(1+1/10749957122*(1+...))))))
MAPLE
ArticoExp := proc (n, q::posint)::list; local L, i, z; Digits := 50000; L := []; z := frac(evalf(n)); for i to q+1 do if z = 0 then break end if; L := [op(L), round(1/abs(z))*sign(z)]; z := abs(z)*round(1/abs(z))-1 end do; return L end proc
# List the first 8 terms of the expansion of 1/phi
ArticoExp((sqrt(5)-1)/2, 8)
MATHEMATICA
Flatten[{2, 4, RecurrenceTable[{a[n] == a[n-1]^2 - 2, a[3] == -18}, a, {n, 3, 10}]}] (* Vaclav Kotesovec, Sep 20 2013 *)
CROSSREFS
KEYWORD
sign,cofr
AUTHOR
Giovanni Artico, Sep 10 2013
STATUS
approved