reviewed
approved
reviewed
approved
proposed
reviewed
editing
proposed
Table[(1 + 5*(Fibonacci[5^n] Fibonacci[5^n + 1] + Fibonacci[5^n - 1]^2))/2, {n, 0, 3}] (* or *)
Table[LucasL[2*5^n], {n, 0, 3}] (* Michael De Vlieger, Jul 30 2017 *)
reviewed
editing
proposed
reviewed
editing
proposed
Iterating the algebraic identity sqrt(1 + 4/x) = (1 + 2*(x + 2)/(x^2 + 3*x + 1)) * sqrt(1 + 4/(x*(x^2 + 5*x + 5)^2)) produces the rapidly converging product expansion sqrt(1 + 4/x) = product Product_{n = 0..inf} (1 + 2*a(n)/b(n)), where a(n) and b(n) are integer sequences when x is an integer: a(n) satisfies the recurrence a(n+1) = a(n)^5 - 5*a(n)^3 + 5*a(n) with the initial condition a(0) = x + 2 and b(n) satisfies the recurrence b(n+1) = 5/2*(b(n)^4 - b(n)^2)*sqrt(4*b(n) + 5) + b(n)^5 + 15/2*b(n)^4 - 25/2*b(n)^2 + 5 with the initial condition b(0) = x^2 + 3*x + 1.
a(n) = (1/2)*{(1 + 5*(Fibonacci(5^n)*Fibonacci(5^n + 1) + (Fibonacci(5^n - 1))^2)}).
proposed
editing
editing
proposed
a(n) = Lucas(2*5^n). - Ehren Metcalfe, Jul 29 2017
approved
editing
reviewed
approved