A145232 -id:A145232 - cp's OEIS frontend

A145275 a(n) = A145232(n+1)/A145232(n).

15005, 792070839820228500005, 311759807762174781605301007201736860141952393239819056256447450170889021063181630442743411596527196875005

Offset: 1

Artur Jasinski, Oct 06 2008

nonn

A member of the family of sequences of type:
(G^(k^(n + 1)) - (1 - G)^(k^(n + 1)))/(G^(k^n) - (1 - G)^(k^n)) where G = (1 + sqrt(5))/2.
For k=2 see A001566.
For k=3 see A002814(n+2).
For k=4 see A145274.
For k=5 see this sequence.
For k=6 see A145276.
For k=7 see A145277.

Amiram Eldar, Table of n, a(n) for n = 1..4

Cf. A001566, A001622, A002814, A145232, A145274, A145276, A145277.

G = (1 + Sqrt[5])/2; Table[Expand[(G^(5^(n + 1)) - (1 - G)^(5^(n + 1)))/Sqrt[5]]/Expand[(G^(5^n) - (1 - G)^(5^n))/Sqrt[5]], {n, 1, 5}]

a(n) = (G^(5^(n + 1)) - (1 - G)^(5^(n + 1)))/(G^(5^n) - (1 - G)^(5^n)) where G = (1 + sqrt(5))/2.

A045529 a(n+1) = 5a(n)^3 - 3a(n), a(0) = 1.

Original entry on oeis.org

1, 2, 34, 196418, 37889062373143906, 271964099255182923543922814194423915162591622175362

Offset: 0

Jose Eduardo Blazek, Dec 11 1999

The next term, a(6), has 153 digits. - Harvey P. Dale, Oct 24 2011

Seiichi Manyama, Table of n, a(n) for n = 0..7
Daniel Duverney and Takeshi Kurosawa, Transcendence of infinite products involving Fibonacci and Lucas numbers, Research in Number Theory, Vol. 8 (2002), Article 68.
Zalman Usiskin, Problem B-265, Elementary Problems and Solutions, The Fibonacci Quarterly, Vol. 11, No. 3 (1973), p. 333; Fibonacci Numbers for Powers of 3, Solution to Problem B-265 by Ralph Garfield and David Zeitlin, ibid., Vol. 12, No. 3 (1974), p. 315.

Cf. (k^n)-th Fibonacci number: A058635 (k=2), this sequence (k=3), A145231 (k=4), A145232 (k=5), A145233 (k=6), A145234 (k=7), A250487 (k=8), A250488 (k=9), A250489 (k=10).

Cf. A000032, A000045, A001622, A001999, A002814, A006267, A094214.

a := proc(n) option remember; if n = 0 then 1 else 5*a(n-1)^3 - 3*a(n-1) end if; end:
seq(a(n), n = 0..5); # Peter Bala, Nov 24 2022

G = (1 + Sqrt[5])/2; Table[Expand[(G^(3^n) - (1 - G)^(3^n))/Sqrt[5]], {n, 1, 7}] (* Artur Jasinski, Oct 05 2008 *)
Table[Round[(4/5)^(1/2)*Cosh[3^n*ArcCosh[((5/4)^(1/2))]]], {n, 1, 4}] (* Artur Jasinski, Oct 05 2008 *)
RecurrenceTable[{a[0]==1,a[n]==5a[n-1]^3-3a[n-1]},a[n],{n,6}] (* Harvey P. Dale, Oct 24 2011 *)
NestList[5#^3-3#&,1,5] (* Harvey P. Dale, Dec 21 2014 *)

A045529(n):=fib(3^n)$
makelist(A045529(n),n,0,10); /* Martin Ettl, Nov 12 2012 */

The first example I know in which a(n) can be expressed as (4/5)^(1/2)*cosh(3^n*arccosh((5/4)^(1/2))).
a(n) = Fibonacci(3^n). - Leroy Quet, Mar 17 2002
a(n+1) = a(n)*A002814(n+1). - Lekraj Beedassy, Jun 16 2003
a(n) = (phi^(3^n) - (1 - phi)^(3^n))/sqrt(5), where phi is the golden ratio (A001622). - Artur Jasinski, Oct 05 2008
a(n) = Product_{k=0..n-1} (Lucas(2*3^k) - 1) (Usiskin, 1973). - Amiram Eldar, Jan 29 2022
From Peter Bala, Nov 24 2022: (Start)
a(2*n+2) == a(2*n) (mod 3^(2*n+1)); a(2*n+3) == a(2*n+1) (mod 3^(2*n+2));
a(2*n+1) + a(2*n) == 0 (mod 3^(2*n+1)).
a(2*n) == 1 (mod 3) and a(2*n+1) == 2 (mod 3).
5*a(n)^2 == 2 (mod 3^(n+1)).
In the ring of 3-adic integers, the sequences {a(2*n)} and {a(2*n+1)} are both Cauchy sequences and converge to the pair of 3-adic roots of the quadratic equation 5*x^2 - 2 = 0. (End)
From Amiram Eldar, Jan 07 2023: (Start)
Product_{n>=1} (1 + 2/(sqrt(5)*a(n)-1)) = phi (A001622).
Product_{n>=1} (1 - 2/(sqrt(5)*a(n)+1)) = 1/phi (A094214).
Both formulas are from Duverney and Kurosawa (2022). (End)

A250486 A(n,k) is the n^k-th Fibonacci number; square array A(n,k), n>=0, k>=0, read by antidiagonals.

Original entry on oeis.org

1, 0, 1, 0, 1, 1, 0, 1, 1, 1, 0, 1, 3, 2, 1, 0, 1, 21, 34, 3, 1, 0, 1, 987, 196418, 987, 5, 1, 0, 1, 2178309, 37889062373143906, 10610209857723, 75025, 8, 1

Offset: 0

Alois P. Heinz, Nov 24 2014

			Square array A(n,k) begins:
  1,  0,  0,      0,       0,    0,  0,  0,   ...
  1,  1,  1,      1,       1,    1,  1,  1,   ...
  1,  1,  3,      21,      987,  2178309,     ...
  1,  2,  34,     196418,  37889062373143906, ...
  1,  3,  987,    10610209857723,             ...
  1,  5,  75025,  59425114757512643212875125, ...
  1,  8,  14930352,                           ...
  1,  13, 7778742049,                         ...

Alois P. Heinz, Antidiagonals n = 0..10, flattened
Wikipedia, Fibonacci number

Columns k=0-8 give: A000012, A000045, A054783, A182149, A250490, A250491, A250492, A250493, A250494.
Rows n=0-10 give: A000007, A000012, A058635, A045529, A145231, A145232, A145233, A145234, A250487, A250488, A250489.
Main diagonal gives A250495.
Cf. A000045.

A:= (n, k)-> (<<0|1>, <1|1>>^(n^k))[1, 2]:
seq(seq(A(n, d-n), n=0..d), d=0..8);

A[n_, k_] := MatrixPower[{{0, 1}, {1, 1}}, n^k][[1, 2]]; A[0, 0] = 1;
Table[A[n, d-n], {d, 0, 8}, {n, 0, d}] // Flatten (* Jean-François Alcover, May 28 2019, from Maple *)

A(n,k) = [0, 1; 1, 1]^(n^k)[1,2].

A145231 a(n) = Fibonacci(4^n).

Original entry on oeis.org

1, 3, 987, 10610209857723, 141693817714056513234709965875411919657707794958199867

Offset: 0

Artur Jasinski, Oct 05 2008

This sequence has the property that a(n+1) is divisible by a(n). Conjecture: each prime divisor can occur only once (i.e., all terms are squarefree). - Artur Jasinski, Oct 05 2008

Seiichi Manyama, Table of n, a(n) for n = 0..6

Cf. A000045, A341601, A341603.

Cf. (k^n)-th Fibonacci number: A058635 (k=2), A045529 (k=3), this sequence (k=4), A145232 (k=5), A145233 (k=6), A145234 (k=7), A250487 (k=8), A250488 (k=9), A250489 (k=10).

a := proc(n) option remember; if n = 1 then 3 else a(n-1)*(5*a(n-1)^2 + 2)*sqrt(5*a(n-1)^2 + 4) end if; end: seq(a(n), n = 1..5); # Peter Bala, Nov 14 2022

G = (1 + Sqrt[5])/2; Table[Expand[(G^(4^n) - (1 - G)^(4^n))/Sqrt[5]], {n, 1, 6}]
Table[Round[(4/5)^(1/2)*Cosh[4^n*ArcCosh[((5/4)^(1/2))]]], {n, 1, 7}]
Fibonacci[4^Range[5]] (* Harvey P. Dale, Mar 28 2012 *)

a(n) = (G^(4^n) - (1-G)^(4^n) )/sqrt(5) where G = (1 + sqrt 5)/2 = A001622.
a(n) = round( sqrt(4/5) *cosh( 4^n*arccosh (sqrt(5/4)) )).
a(n)= A000045(A000302(n)). - Michel Marcus, Nov 07 2013
From Peter Bala, Nov 11 2022: (Start)
a(n+1) = a(n)*(5*a(n)^2 + 2)*sqrt(5*a(n)^2 + 4) for n >= 1.
a(n) == 3 (mod 4) for n >= 1.
a(n+1) == a(n) (mod 2^(2*n+1)).
A341601(n) == a(n) (mod 2^n) for n >= 2.
In the ring of 2-adic integers, the sequence {Fibonacci(4^n)} converges to the 2-adic integer A341603. (End)

A145233 a(n) = Fibonacci(6^n).

Original entry on oeis.org

1, 8, 14930352, 619220451666590135228675387863297874269396512

Offset: 0

Artur Jasinski, Oct 05 2008

nonn

The next term, a(4), has 271 digits. - Harvey P. Dale, Jul 18 2011

Seiichi Manyama, Table of n, a(n) for n = 0..4

Cf. A000045.

Cf. (k^n)-th Fibonacci number: A058635 (k=2), A045529 (k=3), A145231 (k=4), A145232 (k=5), this sequence (k=6), A145234 (k=7), A250487 (k=8), A250488 (k=9), A250489 (k=10).

[Fibonacci(6^n): n in [0..5]]; // Vincenzo Librandi, Apr 02 2011

A145233 := proc(n) combinat[fibonacci](6^n) ; end proc: # R. J. Mathar, Apr 01 2011

G = (1 + Sqrt[5])/2; Table[Expand[(G^(6^n) - (1 - G)^(6^n))/Sqrt[5]], {n, 1, 6}]
(* Second program: *)
Fibonacci[6^Range[4]] (* Harvey P. Dale, Jul 18 2011 *)

a(n) = (G^(6^n) - (1 - G)^(6^n))/sqrt(5) where G = (1 + sqrt(5))/2.

A145234 a(n) = Fibonacci(7^n).

Original entry on oeis.org

1, 13, 7778742049, 215414832505658809004682396169711233230800418578767753330908886771798637

Offset: 0

Artur Jasinski, Oct 05 2008

Seiichi Manyama, Table of n, a(n) for n = 0..4

Cf. A000045.

Cf. (k^n)-th Fibonacci number: A058635 (k=2), A045529 (k=3), A145231 (k=4), A145232 (k=5), A145233 (k=6), this sequence (k=7), A250487 (k=8), A250488 (k=9), A250489 (k=10).

[Fibonacci(7^n): n in [0..5]]; // Vincenzo Librandi, Apr 02 2011

A145234 := proc(n) combinat[fibonacci](7^n) ; end proc:
seq(A145234(n),n=1..3) ; # R. J. Mathar, Apr 01 2011

G = (1 + Sqrt[5])/2; Table[Expand[(G^(7^n) - (1 - G)^(7^n))/Sqrt[5]], {n, 1, 6}]
(* Second program: *)
Table[Round[N[(2/Sqrt[5])*Cosh[7^n*ArcCosh[Sqrt[5]/2]], 1000]], {n, 1, 4}]

a(n) = (G^(7^n) - (1 - G)^(7^n))/sqrt(5) where G = (1 + sqrt(5))/2.
a(n) = (2/sqrt(5))*cosh(7^n*arccosh(sqrt(5)/2)).
a(n+1) = 125*a(n)^7 - 175*a(n)^5 + 70*a(n)^3 - 7*a(n) with a(0) = 1. - Peter Bala, Nov 25 2022

A371647 Decimal expansion of Sum_{k>=0} 1/Fibonacci(5^k).

Original entry on oeis.org

1, 2, 0, 0, 0, 1, 3, 3, 2, 8, 8, 9, 0, 3, 6, 9, 8, 7, 6, 7, 0, 7, 7, 6, 4, 0, 9, 5, 4, 6, 8, 3, 5, 5, 0, 5, 6, 4, 3, 0, 5, 5, 5, 0, 6, 8, 8, 1, 3, 8, 0, 2, 6, 5, 7, 3, 0, 3, 6, 6, 1, 3, 7, 9, 4, 6, 9, 2, 6, 5, 6, 7, 8, 8, 5, 6, 9, 4, 8, 2, 4, 6, 2, 8, 6, 7, 7, 2, 7, 9, 4, 3, 4, 7, 6, 7, 4, 1, 0, 9, 0, 7, 0, 6, 2

Offset: 1

Amiram Eldar, Mar 31 2024

This constant is a transcendental number (Nyblom, 2001).

			1.20001332889036987670776409546835505643055506881380...

M. A. Nyblom, A Theorem on Transcendence of Infinite Series II, Journal of Number Theory, Vol. 91, No. 1 (2001), pp. 71-80.
Index entries for transcendental numbers.

Cf. A000045, A145232, A371648.

Similar constants: A079585, A079586, A153386, A153387, A371649.

RealDigits[Sum[1/Fibonacci[5^k], {k, 0, 10}], 10, 120][[1]]

PARI
```
suminf(k = 0, 1/fibonacci(5^k))
```

Equals Sum_{k>=0} 1/A145232(k).

A371648 Decimal expansion of Product_{k>=0} (1 + 1/Fibonacci(5^k)).

Original entry on oeis.org

2, 4, 0, 0, 0, 3, 1, 9, 8, 9, 3, 3, 6, 8, 8, 7, 7, 0, 4, 0, 9, 8, 6, 3, 3, 8, 2, 9, 1, 2, 4, 5, 9, 0, 4, 4, 8, 8, 5, 5, 4, 9, 7, 8, 3, 1, 9, 3, 3, 8, 7, 6, 7, 8, 8, 4, 2, 5, 9, 6, 1, 1, 5, 6, 8, 7, 9, 3, 5, 0, 3, 7, 9, 0, 2, 9, 3, 0, 1, 3, 9, 6, 1, 0, 0, 0, 6, 4, 3, 0, 2, 5, 1, 3, 1, 8, 3, 6, 0, 7, 8, 0, 0, 4, 1

Offset: 1

Amiram Eldar, Mar 31 2024

This constant is a transcendental number (Nyblom, 2004).

			2.40003198933688770409863382912459044885549783193387...

M. A. Nyblom, On the Construction of a Family of Transcendental Valued Infinite Products, Fibonacci Quarterly, Vol. 42, No. 4 (2004), pp. 353-358.
Index entries for transcendental numbers.

Cf. A000045, A145232, A371647.

Similar constants: A337668, A337669, A371650.

RealDigits[Product[1 + 1/Fibonacci[5^k], {k, 0, 10}], 10, 120][[1]]

PARI
```
prodinf(k = 0, 1 + 1/fibonacci(5^k))
```

Equals Product_{k>=0} (1 + 1/A145232(k)).

cp's OEIS Frontend

A145275 a(n) = A145232(n+1)/A145232(n).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Mathematica

Formula

A045529 a(n+1) = 5*a(n)^3 - 3*a(n), a(0) = 1.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Maple

Mathematica

Maxima

Formula

A250486 A(n,k) is the n^k-th Fibonacci number; square array A(n,k), n>=0, k>=0, read by antidiagonals.

Views

Author

Keywords

Examples

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A145231 a(n) = Fibonacci(4^n).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Maple

Mathematica

Formula

A145233 a(n) = Fibonacci(6^n).

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Magma

Maple

Mathematica

Formula

A145234 a(n) = Fibonacci(7^n).

Views

Author

Keywords

Links

Crossrefs

Programs

Magma

Maple

Mathematica

Formula

A371647 Decimal expansion of Sum_{k>=0} 1/Fibonacci(5^k).

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

Mathematica

PARI

Formula

A045529 a(n+1) = 5a(n)^3 - 3a(n), a(0) = 1.