A014565 -id:A014565 - cp's OEIS frontend

A005614 The binary complement of the infinite Fibonacci word A003849. Start with 1, apply 0->1, 1->10, iterate, take limit.

1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 1, 0

Offset: 0

N. J. A. Sloane

Previous name was: The infinite Fibonacci word (start with 1, apply 0->1, 1->10, iterate, take limit).
Characteristic function of A022342. - Philippe Deléham, May 03 2004
a(n) = number of 0's between successive 1's (see also A003589 and A007538). - Eric Angelini, Jul 06 2005
With offset 1 this is the characteristic sequence for Wythoff A-numbers A000201=[1,3,4,6,...].
Eric Angelini's comment made me think that if 1 is defined to be the number of 0's between successive 1's in a string of 0's and 1's, then this string is 101. Applying the same operation to the digits of 101 leads to 101101, the iteration leads to successive palindromes of lengths given by A001911, up to a(n). - Rémi Schulz, Jul 06 2010
For generalized Fibonacci words see A221150, A221151, A221152, ... - Peter Bala, Nov 11 2013
The limiting mean of the first n terms is phi - 1; the limiting variance is phi (A001622). - Clark Kimberling, Mar 12 2014
Apply the difference operator to every column of the Wythoff difference array, A080164, to get an array of Fibonacci numbers, F(h). Replace each F(h) with h, and apply the difference operator to every column. In the resulting array, every column is A005614. - Clark Kimberling, Mar 02 2015
Binary expansion of the rabbit constant A014565. - M. F. Hasler, Nov 10 2018

			The infinite word is 101101011011010110101101101011...

J.-P. Allouche and J. Shallit, Automatic Sequences, Cambridge Univ. Press, 2003.
G. Melançon, Factorizing infinite words using Maple, MapleTech journal, vol. 4, no. 1, 1997, pp. 34-42, esp. p. 36.

T. D. Noe, Table of n, a(n) for n = 0..10945 (19 iterations)
Ricardo Gómez Aíza, Symbolic dynamical scales: modes, orbitals, and transversals, arXiv:2009.02669 [math.DS], 2020.
F. Axel et al., Vibrational modes in a one dimensional "quasi-alloy": the Morse case, J. de Physique, Colloq. C3, Supp. to No. 7, Vol. 47 (Jul 1986), pp. C3-181-C3-186; see Eq. (10).
Joerg Arndt, Matters Computational (The Fxtbook), 753-754.
E. A. Bender and J. T. Butler, Asymptotic approximations for the number of fanout-free functions, IEEE Trans. Computers, 27 (1978), 1180-1183. (Annotated scanned copy)
M. Bunder and K. Tognetti, On the self matching properties of [j tau], Discrete Math., 241 (2001), 139-151.
J. T. Butler, Letter to N. J. A. Sloane, Dec. 1978.
Glen Joyce C. Dulatre, Jamilah V. Alarcon, Vhenedict M. Florida, and Daisy Ann A. Disu, On Fractal Sequences, DMMMSU-CAS Science Monitor (2016-2017) Vol. 15 No. 2, 109-113.
S. Dulucq and D. Gouyou-Beauchamps, Sur les facteurs des suites de Sturm, Theoret. Comput. Sci. 71 (1990), 381-400.
M. S. El Naschie, Statistical geometry of a Cantor discretum and semiconductors, Computers & Mathematics with Applications, Vol. 29 (Issue 12, June 1995), 103-110.
D. Gault and M. Clint, "Curiouser and curiouser" said Alice. Further reflections on an interesting recursive function, Internat. J. Computer Math., 26 (1988), 35-43.
D. Gault and M. Clint, "Curiouser and curiouser said Alice. Further reflections on an interesting recursive function, Intern. J. Computer. Math., 26 (1988), 35-43. (Annotated scanned copy)
J. Grytczuk, Infinite semi-similar words, Discrete Math. 161 (1996), 133-141.
Clark Kimberling, Intriguing infinite words composed of zeros and ones, Elemente der Mathematik (2021).
Clark Kimberling and K. B. Stolarsky, Slow Beatty sequences, devious convergence, and partitional divergence, Amer. Math. Monthly, 123 (No. 2, 2016), 267-273.
K. L. Kodandapani and S. C. Seth, On combinational networks with restricted fan-out, IEEE Trans. Computers, 27 (1978), 309-318. (Annotated scanned copy)
Ron Knott, The Fibonacci Rabbit Sequence
Wolfdieter Lang, The Tribonacci and ABC Representations of Numbers are Equivalent, arXiv preprint arXiv:1810.09787 [math.NT], 2018.
G. Melançon, Lyndon factorization of sturmian words, Discr. Math., 210 (2000), 137-149.
S. Mneimneh, Fibonacci in The Curriculum: Not Just a Bad Recurrence, in Proceeding SIGCSE '15 Proceedings of the 46th ACM Technical Symposium on Computer Science Education, 253-258.
C. Mongoven, The Rabbit Sequence (a musical composition with A005614).
T. D. Noe, The first 1652 subwords, including leading zeros.
José L. Ramírez, Gustavo N. Rubiano, and Rodrigo de Castro, A Generalization of the Fibonacci Word Fractal and the Fibonacci Snowflake, arXiv preprint arXiv:1212.1368 [cs.DM], 2012-2014.
Jeffrey Shallit, Characteristic words as fixed points of homomorphisms, University of Waterloo Technical Report CS-91-72, 1991.
Jeffrey Shallit, Characteristic words as fixed points of homomorphisms. [Cached copy, with permission]
N. J. A. Sloane, Families of Essentially Identical Sequences, Mar 24 2021 (Includes this sequence)
K. B. Stolarsky, Beatty sequences, continued fractions and certain shift operators, Canad. Math. Bull., 19 (1976), 473-482.
Scott V. Tezlaf, On ordinal dynamics and the multiplicity of transfinite cardinality, arXiv:1806.00331 [math.NT], 2018. See p. 10.
Eric Weisstein's World of Mathematics, Rabbit Constant and Rabbit Sequence.
Index entries for characteristic functions
Index entries for sequences that are fixed points of mappings

Binary complement of A003849, which is the standard form of this sequence.
Two other essentially identical sequences are A096270, A114986.
Subwords: A178992, A171676.
Cf. A000045 (Fibonacci numbers), A001468, A001911, A005206 (partial sums), A014565, A014675, A022342, A036299, A044432, A221150, A221151, A221152.
Cf. A339051 (odd bisection), A339052 (even bisection).
The following sequences are all essentially the same, in the sense that they are simple transformations of each other, with A000201 as the parent: A000201, A001030, A001468, A001950, A003622, A003842, A003849, A004641, A005614, A014675, A022342, A088462, A096270, A114986, A124841. - N. J. A. Sloane, Mar 11 2021

a005614 n = a005614_list !! n
a005614_list = map (1 -) a003849_list
-- Reinhard Zumkeller, Apr 07 2012

[Floor((n+1)*(-1+Sqrt(5))/2)-Floor(n*(-1+Sqrt(5))/2): n in [1..100]]; // Vincenzo Librandi, Jan 17 2019

Digits := 50; u := evalf((1-sqrt(5))/2); A005614 := n->floor((n+1)*u)-floor(n*u);

Nest[ Flatten[ # /. {0 -> {1}, 1 -> {1, 0}}] &, {1}, 10] (* Robert G. Wilson v, Jan 30 2005 *)
Flatten[Nest[{#, #[[1]]} &, {1, 0}, 9]] (* IWABUCHI Yu(u)ki, Oct 23 2013 *)
SubstitutionSystem[{0 -> {1}, 1 -> {1, 0}}, {1, 0}, 9] // Last (* Jean-François Alcover, Feb 06 2020 *)

a(n,w1,s0,s1)=local(w2); for(i=2,n,w2=[ ]; for(k=1,length(w1),w2=concat(w2, if(w1[ k ],s1,s0))); w1=w2); w2
for(n=2,10,print(n" "a(n,[ 0 ],[ 1 ],[ 1,0 ]))) \\ Gives successive convergents to sequence

/* for m>=1 compute exactly A183136(m+1)+1 terms of the sequence */
r=(1+sqrt(5))/2;v=[1,0];for(n=2,m,v=concat(v,vector(floor((n+1)/r),i,v[i]));a(n)=v[n];) /* Benoit Cloitre, Jan 16 2013 */

from math import isqrt
def A005614(n): return (n+isqrt(m:=5*(n+2)**2)>>1)-(n+1+isqrt(m-10*n-15)>>1) # Chai Wah Wu, Aug 17 2022

Define strings S(0)=1, S(1)=10, thereafter S(n)=S(n-1)S(n-2); iterate. Sequence is S(oo). The individual S(n)'s are given in A036299.
a(n) = floor((n+2)*u) - floor((n+1)*u), where u = (-1 + sqrt(5))/2.
Sum_{n>=0} a(n)/2^(n+1) = A014565. - R. J. Mathar, Jul 19 2013
From Peter Bala, Nov 11 2013: (Start)
If we read the present sequence as the digits of a decimal constant c = 0.101101011011010 ... then we have the series representation c = Sum_{n >= 1} 1/10^floor(n*phi). An alternative representation is c = Sum_{n >= 1} 1/10^floor(n/phi) - 10/9.
The constant 9*c has the simple continued fraction representation [0; 1, 10, 10, 100, 1000, ..., 10^Fibonacci(n), ...]. See A010100.
Using this result we can find the alternating series representation c = 1/9 - 9*Sum_{n >= 1} (-1)^(n+1)*(1 + 10^Fibonacci(3*n+1))/( (10^(Fibonacci(3*n - 1)) - 1)*(10^(Fibonacci(3*n + 2)) - 1) ). The series converges very rapidly: for example, the first 10 terms of the series give a value for c accurate to more than 5.7 million decimal places. Cf. A014565. (End)
a(n) = A005206(n+1) - A005206(n). a(2*n) = A339052(n); a(2*n+1) = A339051(n+1). - Peter Bala, Aug 09 2022

Corrected by Clark Kimberling, Oct 04 2000

Name corrected by Michel Dekking, Apr 02 2019

A000301 a(n) = a(n-1)*a(n-2) with a(0) = 1, a(1) = 2; also a(n) = 2^Fibonacci(n).

Original entry on oeis.org

1, 2, 2, 4, 8, 32, 256, 8192, 2097152, 17179869184, 36028797018963968, 618970019642690137449562112, 22300745198530623141535718272648361505980416, 13803492693581127574869511724554050904902217944340773110325048447598592

Offset: 0

N. J. A. Sloane, Mar 15 1996

Continued fraction expansion of s = A073115 = 1.709803442861291... = Sum_{k >= 0} (1/2^floor(k * phi)) where phi is the golden ratio (1 + sqrt(5))/2. - Benoit Cloitre, Aug 19 2002

The continued fraction expansion of the above constant s is [1; 1, 2, 2, 4, ...], that of the rabbit constant r = s-1 = A014565 is [0; 1, 2, 2, 4, ...]. - M. F. Hasler, Nov 10 2018

Stephen Wolfram, A New Kind of Science, Wolfram Media, 2002, p. 913.

T. D. Noe, Table of n, a(n) for n = 0..18
Manosij Ghosh Dastidar and Michael Wallner, Bijections between Variants of Dyck Paths and Integer Compositions, arXiv:2406.16404 [math.CO], 2024. See p. 1.
J. L. Davison, A series and its associated continued fraction, Proc. Amer. Math. Soc., 63 (1977), 29-32.
Samuele Giraudo, Intervals of balanced binary trees in the Tamari lattice, arXiv preprint arXiv:1107.3472 [math.CO], 2011-2012, and Theor Comput Sci 420 (2012) 1-27.
Bertrand Teguia Tabuguia, Computing with D-Algebraic Sequences, arXiv:2412.20630 [math.AG], 2024. See p. 9.
Index to divisibility sequences

Cf. A000045, A000079, A000304, A010098, A010099, A010100, A073115, A124091.

Column k = 2 of A244003.

a000301 = a000079 . a000045
a000301_list = 1 : scanl (*) 2 a000301_list
-- Reinhard Zumkeller, Mar 20 2013

[2^Fibonacci(n): n in [0..20]]; // Vincenzo Librandi, Apr 18 2011

A000301 := proc(n) option remember;
             if n < 2 then 1+n
           else A000301(n-1)*A000301(n-2)
             fi
           end:
seq(A000301(n), n=0..15);

2^Fibonacci[Range[0, 14]] (* Alonso del Arte, Jul 28 2016 *)

a(n)=1<Charles R Greathouse IV, Jan 12 2012

[2^fibonacci(n) for n in range(15)] # G. C. Greubel, Jul 29 2024

a(n) ~ k^phi^n with k = 2^(1/sqrt(5)) = 1.3634044... and phi the golden ratio. - Charles R Greathouse IV, Jan 12 2012
a(n) = A000304(n+3) / A010098(n+1). - Reinhard Zumkeller, Jul 06 2014
Sum_{n>=0} 1/a(n) = A124091. - Amiram Eldar, Oct 27 2020
Limit_{n->oo} a(n)/a(n-1)^phi = 1. - Peter Woodward, Nov 24 2023

Offset changed from 1 to 0 by Vincenzo Librandi, Apr 18 2011

A008346 a(n) = Fibonacci(n) + (-1)^n.

Original entry on oeis.org

1, 0, 2, 1, 4, 4, 9, 12, 22, 33, 56, 88, 145, 232, 378, 609, 988, 1596, 2585, 4180, 6766, 10945, 17712, 28656, 46369, 75024, 121394, 196417, 317812, 514228, 832041, 1346268, 2178310, 3524577, 5702888, 9227464, 14930353, 24157816, 39088170, 63245985, 102334156

Offset: 0

N. J. A. Sloane

Diagonal sums of A059260. - Paul Barry, Oct 25 2004
The absolute value of the Euler characteristic of the Boolean complex of the Coxeter group A_n. - Bridget Tenner, Jun 04 2008
a(n) is the number of compositions (ordered partitions) of n into two sorts of 2's and one sort of 3's.  Example: the a(5)=4 compositions of 5 are 2+3, 2'+3, 3+2 and 3+2'. - Bob Selcoe, Jun 21 2013
Let r = 0.70980344286129... denote the rabbit constant A014565. The sequence 2^a(n) gives the simple continued fraction expansion of the constant r/2 = 0.35490172143064565732 ... = 1/(2^1 + 1/(2^0 + 1/(2^2 + 1/(2^1 + 1/(2^4 + 1/(2^4 + 1/(2^9 + 1/(2^12 + ... )))))))). Cf. A099925. - Peter Bala, Nov 06 2013
a(n) is the top left entry of the n-th power of the 3 X 3 matrix [0, 1, 1; 1, 0, 1; 1, 0, 0] or of the 3 X 3 matrix [0, 1, 1; 1, 0, 0; 1, 1, 0]. - R. J. Mathar, Feb 03 2014
a(n) is the number of growing self-avoiding walks with n+3 edges on the grid graph of integer points (x,y) with x >= 0 and y in {0, 1} and with a trapped endpoint. - Jay Pantone, Jul 26 2024

			The Boolean complex of Coxeter group A_4 is homotopy equivalent to the wedge of 2 spheres S^3, which has Euler characteristic 1 - 2 = -1.

Vincenzo Librandi, Table of n, a(n) for n = 0..1000
G. Bilgici, Generalized order-k Pell-Padovan-like numbers by matrix methods, Pure and Applied Mathematics Journal, 2013; 2(6): 174-178.
Tomislav Došlić, Mate Puljiz, Stjepan Šebek, and Josip Žubrinić, Predators and altruists arriving on jammed Riviera, arXiv:2401.01225 [math.CO], 2024. See p. 14.
N. Gogin and A. Mylläri, Padovan-like sequences and Bell polynomials, Proceedings of Applications of Computer Algebra ACA, 2013.
Jia Huang, Partially Palindromic Compositions, J. Int. Seq. (2023) Vol. 26, Art. 23.4.1. See pp. 4, 13.
INRIA Algorithms Project, Encyclopedia of Combinatorial Structures 445
Jay Pantone, A. R. Klotz, and E. Sullivan, Exactly-solvable self-trapping lattice walks. II. Lattices of arbitrary height., arXiv:2407.18205 [math.CO], 2024.
K. Ragnarsson and B. E. Tenner, Homotopy type of the Boolean complex of a Coxeter system, arXiv:0806.0906 [math.CO], 2008-2009.
Index entries for linear recurrences with constant coefficients, signature (0,2,1).

Cf. A007492, A066983, A078024, A119282, A014565, A099925, A098600, A374297.

List([0..50], n-> Fibonacci(n) + (-1)^n); # G. C. Greubel, Jul 13 2019

[Fibonacci(n) + (-1)^n: n in [0..50]]; // Vincenzo Librandi, Apr 23 2011

with(combinat): f := n->fibonacci(n)+(-1)^n; seq(f(n), n=0..40);

Table[Fibonacci[n]+(-1)^n,{n,0,50}] (* Vladimir Joseph Stephan Orlovsky, Jul 22 2008 *)
CoefficientList[Series[1/(1-2x^2-x^3), {x, 0, 50}], x] (* Vincenzo Librandi, Jun 10 2013 *)
LinearRecurrence[{0,2,1}, {1,0,2}, 51] (* Ray Chandler, Sep 08 2015 *)

a(n)=fibonacci(n)+(-1)^n \\ Charles R Greathouse IV, Feb 03 2014

[fibonacci(n)+(-1)^n for n in (0..50)] # G. C. Greubel, Jul 13 2019

G.f.: 1/(1 - 2*x^2 - x^3).
a(n) = 2*a(n-2) + a(n-3).
a(n) = Sum_{k=0..floor(n/2)} Sum_{j=0..n-k} (-1)^(n-k-j)binomial(j, k). Diagonal sums of A059260. - Paul Barry, Sep 23 2004
From Paul Barry, Oct 04 2004: (Start)
a(n) = Sum_{k=0..floor(n/2)} binomial(k, n-2k)2^(3k-n).
a(n) = Sum_{k=0..floor(n/2)} binomial(k, n-2k)2^k(1/2)^(n-2k). (End)
From Paul Barry, Oct 25 2004: (Start)
G.f.: 1/((1+x)*(1-x-x^2)).
a(n) = Sum_{k=0..n} binomial(n-k-1, k). (End)
a(n) = |1 + (-1)^(n-1)*Fibonacci(n-1)|. - Bridget Tenner, Jun 04 2008
a(n) = A000045(n) + A033999(n). - Michel Marcus, Nov 14 2013
a(n) = Fibonacci(n+1) - a(n-1), with a(0) = 1. - Franklin T. Adams-Watters, Mar 26 2014
a(n) = b(n+1) where b(n) = b(n-1) + b(n-2) + (-1)^(n+1), b(0) = 0, b(1) = 1. See also A098600.  - Richard R. Forberg, Aug 30 2014
a(n) = b(n+2) where b(n) = Sum_{k=1..n} b(n-k)*A000931(k+1), b(0) = 1. - J. Conrad, Apr 19 2017
a(n) = Sum_{j=n+1..2*n+1} F(j) mod Sum_{j=0..n} F(j) for n > 2 and F(j)=A000045(j). - Art Baker, Jan 20 2019

A010098 a(n) = a(n-1)*a(n-2) with a(0)=1, a(1)=3.

Original entry on oeis.org

1, 3, 3, 9, 27, 243, 6561, 1594323, 10460353203, 16677181699666569, 174449211009120179071170507, 2909321189362570808630465826492242446680483, 507528786056415600719754159741696356908742250191663887263627442114881

Offset: 0

N. J. A. Sloane

nonn

From Peter Bala, Nov 01 2013: (Start)
Let phi = (1/2)*(1 + sqrt(5)) denote the golden ratio A001622. This sequence gives the simple continued fraction expansion of the constant c := 2*Sum_{n>=1} 1/3^floor(n*phi) (= 4*Sum_{n>=1} floor(n/phi)/3^n) = 0.768597560593155198508 ... = 1/(1 + 1/(3 + 1/(3 + 1/(9 + 1/(27 + 1/(243 + 1/(6561 + ...))))))). The constant c is known to be transcendental (see Adams and Davison 1977). Cf. A014565.
Furthermore, for k = 0,1,2,... if we put X(k) = sum {n >= 1} 1/3^(n*Fibonacci(k) + Fibonacci(k+1)*floor(n*phi)) then the real number X(k+1)/X(k) has the simple continued fraction expansion [0; a(k+1), a(k+2), a(k+3), ...] (apply Bowman 1988, Corollary 1). (End)

Vincenzo Librandi, Table of n, a(n) for n = 0..17
W. W. Adams and J. L. Davison, A remarkable class of continued fractions, Proc. Amer. Math. Soc. 65 (1977), 194-198.
P. G. Anderson, T. C. Brown, and P. J.-S. Shiue, A simple proof of a remarkable continued fraction identity, Proc. Amer. Math. Soc. 123 (1995), 2005-2009.
D. Bowman, A new generalization of Davison's theorem, Fib. Quart. Volume 26 (1988), 40-45

Cf. A000045, A000301, A000304, A010099, A010100, A014565, A214706, A214887, A215270, A215271, A215272.

Column k=3 of A244003.

a010098 n = a010098_list !! n
a010098_list = 1 : 3 : zipWith (*) a010098_list (tail a010098_list)
-- Reinhard Zumkeller, Jul 06 2014

[3^Fibonacci(n): n in [0..12]]; // G. C. Greubel, Jul 29 2024

a[-1]:=1: a[0]:=3: a[1]:=3: for n from 2 to 13 do a[n]:=a[n-1]*a[n-2] od: seq(a[n], n=-1..10); # Zerinvary Lajos, Mar 19 2009

3^Fibonacci[Range[0,13]] (* Vladimir Joseph Stephan Orlovsky, Jan 21 2012 *)
RecurrenceTable[{a[0]==1,a[1]==3,a[n]==a[n-1]a[n-2]},a,{n,15}] (* Harvey P. Dale, Jan 21 2021 *)

[3^fibonacci(n) for n in range(13)] # G. C. Greubel, Jul 29 2024

a(n) = 3^Fibonacci(n).

a(n+1) = A000304(n+3) / A000301(n). - Reinhard Zumkeller, Jul 06 2014

A010100 a(n) = a(n-1)*a(n-2) with a(0)=1, a(1)=10.

Original entry on oeis.org

1, 10, 10, 100, 1000, 100000, 100000000, 10000000000000, 1000000000000000000000, 10000000000000000000000000000000000, 10000000000000000000000000000000000000000000000000000000

Offset: 0

N. J. A. Sloane

nonn

From Peter Bala, Nov 11 2013: (Start)
Let phi = 1/2*(1 + sqrt(5)) denote the golden ratio A001622. This sequence is the simple continued fraction expansion of the constant c := 9*sum {n = 1..inf} 1/10^floor(n*phi) (= 81*sum {n = 1..inf} floor(n/phi)/10^n) = 0.90990 90990 99090 99090 ... = 1/(1 + 1/(10 + 1/(10 + 1/(100 + 1/(1000 + 1/(100000 + 1/(100000000 + ...))))))). The constant c is known to be transcendental (see Adams and Davison 1977). Cf. A014565 and A005614.
Furthermore, for k = 0,1,2,... if we define the real number X(k) = sum {n >= 1} 1/10^(n*Fibonacci(k) + Fibonacci(k+1)*floor(n*phi)) then the real number X(k+1)/X(k) has the simple continued fraction expansion [0; a(k+1), a(k+2), a(k+3), ...] (apply Bowman 1988, Corollary 1). (End)

Alois P. Heinz, Table of n, a(n) for n = 0..16
W. W. Adams and J. L. Davison, A remarkable class of continued fractions, Proc. Amer. Math. Soc. 65 (1977), 194-198.
P. G. Anderson, T. C. Brown, P. J.-S. Shiue, A simple proof of a remarkable continued fraction identity, Proc. Amer. Math. Soc. 123 (1995), 2005-2009.
D. Bowman, A new generalization of Davison's theorem, Fib. Quart. Volume 26 (1988), 40-45

Cf. A000045, A000301, A010098, A010099. A005614, A014565, A214706, A214887, A215270, A215271, A215272.

Column k=10 of A244003.

a:= n-> 10^(<<1|1>, <1|0>>^n)[1, 2]:
seq(a(n), n=0..12);  # Alois P. Heinz, Jun 17 2014

10^Fibonacci[Range[0,10]] (* Harvey P. Dale, Feb 12 2023 *)

a(n) = 10^fibonacci(n); \\ Michel Marcus, Oct 25 2017

a(n) = 10^Fibonacci(n).

A214706 a(n) = a(n-1)*a(n-2) with a(0)=1, a(1)=5.

Original entry on oeis.org

1, 5, 5, 25, 125, 3125, 390625, 1220703125, 476837158203125, 582076609134674072265625, 277555756156289135105907917022705078125, 161558713389263217748322010169914619837072677910327911376953125

Offset: 0

Vincenzo Librandi, Aug 01 2012

a(17) has 1117 digits.
From Peter Bala, Nov 01 2013: (Start)
Let phi = 1/2*(1 + sqrt(5)) denote the golden ratio A001622. This sequence is the simple continued fraction expansion of the constant c := 4*Sum_{n = 1..oo} 1/5^floor(n*phi) (= 16*Sum_{n = 1..oo} floor(n/phi)/5^n) = 0.83866 83869 91037 14262 ... = 1/(1 + 1/(5 + 1/(5 + 1/(25 + 1/(125 + 1/(3125 + 1/(390625 + ...))))))). The constant c is known to be transcendental (see Adams and Davison 1977). Cf. A014565.
Furthermore, for k = 0,1,2,... if we define the real number X(k) = sum {n >= 1} 1/5^(n*Fibonacci(k) + Fibonacci(k+1)*floor(n*phi)) then the real number X(k+1)/X(k) has the simple continued fraction expansion [0; a(k+1), a(k+2), a(k+3), ...] (apply Bowman 1988, Corollary 1). (End)

Vincenzo Librandi, Table of n, a(n) for n = 0..16
W. W. Adams and J. L. Davison, A remarkable class of continued fractions, Proc. Amer. Math. Soc. 65 (1977), 194-198.
P. G. Anderson, T. C. Brown, and P. J.-S. Shiue, A simple proof of a remarkable continued fraction identity, Proc. Amer. Math. Soc. 123 (1995), 2005-2009.
D. Bowman, A new generalization of Davison's theorem, Fib. Quart. Volume 26 (1988), 40-45.

Cf. A000045, A000301, A001622, A010098, A010099, A010100, A014565, A214706, A214887, A215270, A215271, A215272.

Column k=5 of A244003.

Magma
```
[5^Fibonacci(n): n in [0..13]];
```

a:= n-> 5^(<<1|1>, <1|0>>^n)[1, 2]:
seq(a(n), n=0..12);  # Alois P. Heinz, Jun 17 2014

5^Fibonacci[Range[0,11]]
nxt[{a_,b_}]:={b,a*b}; NestList[nxt,{1,5},12][[All,1]] (* Harvey P. Dale, Oct 14 2018 *)

[5^fibonacci(n) for n in range(15)] # G. C. Greubel, Jan 07 2024

a(n) = 5^Fibonacci(n).

A214887 a(n) = a(n-1)*a(n-2) with a(0)=1, a(1)=7.

Original entry on oeis.org

1, 7, 7, 49, 343, 16807, 5764801, 96889010407, 558545864083284007, 54116956037952111668959660849, 30226801971775055948247051683954096612865741943

Offset: 0

Vincenzo Librandi, Aug 01 2012

a(17) has 1350 digits.
From Peter Bala, Nov 01 2013: (Start)
Let phi = 1/2*(1 + sqrt(5)) denote the golden ratio A001622. This sequence is the simple continued fraction expansion of the constant c := 6*sum {n = 1..inf} 1/7^floor(n*phi) (= 36*sum {n = 1..inf} floor(n/phi)/7^n) = 0.87718 67194 00499 51922 ... = 1/(1 + 1/(7 + 1/(7 + 1/(49 + 1/(343 + 1/(16807 + 1/(5764801 + ...))))))). The constant c is known to be transcendental (see Adams and Davison 1977). Cf. A014565.
Furthermore, for k = 0,1,2,... if we define the real number X(k) = sum {n >= 1} 1/7^(n*Fibonacci(k) + Fibonacci(k+1)*floor(n*phi)) then the real number X(k+1)/X(k) has the simple continued fraction expansion [0; a(k+1), a(k+2), a(k+3), ...] (apply Bowman 1988, Corollary 1). (End)

Vincenzo Librandi, Table of n, a(n) for n = 0..16
W. W. Adams and J. L. Davison, A remarkable class of continued fractions, Proc. Amer. Math. Soc. 65 (1977), 194-198.
P. G. Anderson, T. C. Brown, P. J.-S. Shiue, A simple proof of a remarkable continued fraction identity, Proc. Amer. Math. Soc. 123 (1995), 2005-2009.
D. Bowman, A new generalization of Davison's theorem, Fib. Quart. Volume 26 (1988), 40-45

Cf. A000045, A000301, A010098, A010099, A010100, A214706, A014565, A215270, A215271, A215272.

Column k=7 of A244003.

Magma
```
[7^Fibonacci(n): n in [0..10]];
```

a:= n-> 7^(<<1|1>, <1|0>>^n)[1, 2]:
seq(a(n), n=0..12);  # Alois P. Heinz, Jun 17 2014

7^Fibonacci[Range[0,10]]
nxt[{a_,b_}]:={b,a*b}; Transpose[NestList[nxt,{1,7},10]][[1]] (* Harvey P. Dale, Jun 10 2014 *)

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

A215270 a(n) = a(n-1)*a(n-2) with a(0)=1, a(1)=6.

Original entry on oeis.org

1, 6, 6, 36, 216, 7776, 1679616, 13060694016, 21936950640377856, 286511799958070431838109696, 6285195213566005335561053533150026217291776, 1800782593726645086383198950649858141454002621435149880441896326660096

Offset: 0

Bruno Berselli, Aug 07 2012

From Peter Bala, Nov 01 2013: (Start)
Let phi = 1/2*(1 + sqrt(5)) denote the golden ratio A001622. This sequence is the simple continued fraction expansion of the constant c := 5*sum {n = 1..inf} 1/6^floor(n*phi) (= 25*sum {n = 1..inf} floor(n/phi)/6^n) = 0.86045 01626 86090 61353 ... = 1/(1 + 1/(6 + 1/(6 + 1/(36 + 1/(216 + 1/(7776 + 1/(1679616 + ...))))))). The constant c is known to be transcendental (see Adams and Davison 1977). Cf. A014565.
Furthermore, for k = 0,1,2,... if we define the real number X(k) = sum {n >= 1} 1/6^(n*Fibonacci(k) + Fibonacci(k+1)*floor(n*phi)) then the real number X(k+1)/X(k) has the simple continued fraction expansion [0; a(k+1), a(k+2), a(k+3), ...] (apply Bowman 1988, Corollary 1). (End)

Bruno Berselli, Table of n, a(n) for n = 0..15
W. W. Adams and J. L. Davison, A remarkable class of continued fractions, Proc. Amer. Math. Soc. 65 (1977), 194-198.
P. G. Anderson, T. C. Brown, P. J.-S. Shiue, A simple proof of a remarkable continued fraction identity, Proc. Amer. Math. Soc. 123 (1995), 2005-2009.
D. Bowman, A new generalization of Davison's theorem, Fib. Quart. Volume 26 (1988), 40-45

Cf. A000045, A000301, A010098-A010100, A214706, A214887, A215271, A215272.
Cf. A166470 (same recurrence with initial values 2, 6). A014565.
Column k=6 of A244003.

Magma
```
[6^Fibonacci(n): n in [0..11]];
```

a:= n-> 6^(<<1|1>, <1|0>>^n)[1, 2]:
seq(a(n), n=0..12);  # Alois P. Heinz, Jun 17 2014

RecurrenceTable[{a[0] == 1, a[1] == 6, a[n] == a[n - 1] a[n - 2]}, a[n], {n, 0, 15}]

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

A215271 a(n) = a(n-1)*a(n-2) with a(0)=1, a(1)=8.

Original entry on oeis.org

1, 8, 8, 64, 512, 32768, 16777216, 549755813888, 9223372036854775808, 5070602400912917605986812821504, 46768052394588893382517914646921056628989841375232, 237142198758023568227473377297792835283496928595231875152809132048206089502588928

Offset: 0

Bruno Berselli, Aug 07 2012

From Peter Bala, Nov 01 2013: (Start)
Let phi = 1/2*(1 + sqrt(5)) denote the golden ratio A001622. This sequence is the simple continued fraction expansion of the constant c := 7*sum {n = 1..inf} 1/8^floor(n*phi) (= 49*sum {n = 1..inf} floor(n/phi)/8^n) = 0.89040 80325 60827 28336 ... = 1/(1 + 1/(8 + 1/(8 + 1/(64 + 1/(512 + 1/(32768 + 1/(16777216 + ...))))))). The constant c is known to be transcendental (see Adams and Davison 1977). Cf. A014565.
Furthermore, for k = 0,1,2,... if we define the real number X(k) = sum {n >= 1} 1/8^(n*Fibonacci(k) + Fibonacci(k+1)*floor(n*phi)) then the real number X(k+1)/X(k) has the simple continued fraction expansion [0; a(k+1), a(k+2), a(k+3), ...] (apply Bowman 1988, Corollary 1). (End)

Bruno Berselli, Table of n, a(n) for n = 0..15
W. W. Adams and J. L. Davison, A remarkable class of continued fractions, Proc. Amer. Math. Soc. 65 (1977), 194-198.
P. G. Anderson, T. C. Brown, P. J.-S. Shiue, A simple proof of a remarkable continued fraction identity, Proc. Amer. Math. Soc. 123 (1995), 2005-2009.
D. Bowman, A new generalization of Davison's theorem, Fib. Quart. Volume 26 (1988), 40-45

Cf. A000045, A000301, A010098-A010100, A214706, A214887, A215270, A215272, A014565.

Column k=8 of A244003.

Magma
```
[8^Fibonacci(n): n in [0..11]];
```

a:= n-> 8^(<<1|1>, <1|0>>^n)[1, 2]:
seq(a(n), n=0..12);  # Alois P. Heinz, Jun 17 2014

RecurrenceTable[{a[0] == 1, a[1] == 8, a[n] == a[n - 1] a[n - 2]}, a[n], {n, 0, 15}]

a(n) = 8^Fibonacci(n).

A215272 a(n) = a(n-1)*a(n-2) with a(0)=1, a(1)=9.

Original entry on oeis.org

1, 9, 9, 81, 729, 59049, 43046721, 2541865828329, 109418989131512359209, 278128389443693511257285776231761, 30432527221704537086371993251530170531786747066637049

Offset: 0

Bruno Berselli, Aug 07 2012

From Peter Bala, Nov 01 2013: (Start)
Let phi = 1/2*(1 + sqrt(5)) denote the golden ratio A001622. This sequence is the simple continued fraction expansion of the constant c := 8*sum {n = 1..inf} 1/9^floor(n*phi) (= 64*sum {n = 1..inf} floor(n/phi)/9^n) = 0.90109 74122 99938 29901 ... = 1/(1 + 1/(9 + 1/(9 + 1/(81 + 1/(729 + 1/(59049 + 1/(43046721 + ...))))))). The constant c is known to be transcendental (see Adams and Davison 1977). Cf. A014565.
Furthermore, for k = 0,1,2,... if we define the real number X(k) = sum {n >= 1} 1/9^(n*Fibonacci(k) + Fibonacci(k+1)*floor(n*phi)) then the real number X(k+1)/X(k) has the simple continued fraction expansion [0; a(k+1), a(k+2), a(k+3), ...] (apply Bowman 1988, Corollary 1). (End)

Bruno Berselli, Table of n, a(n) for n = 0..15
W. W. Adams and J. L. Davison, A remarkable class of continued fractions, Proc. Amer. Math. Soc. 65 (1977), 194-198.
P. G. Anderson, T. C. Brown, P. J.-S. Shiue, A simple proof of a remarkable continued fraction identity, Proc. Amer. Math. Soc. 123 (1995), 2005-2009.
D. Bowman, A new generalization of Davison's theorem, Fib. Quart. Volume 26 (1988), 40-45

Cf. A000045, A000301, A010098-A010100, A214706, A214887, A215270, A215271, A014565.

Column k=9 of A244003.

Magma
```
[9^Fibonacci(n): n in [0..10]];
```

a:= n-> 9^(<<1|1>, <1|0>>^n)[1, 2]:
seq(a(n), n=0..12);  # Alois P. Heinz, Jun 17 2014

RecurrenceTable[{a[0] == 1, a[1] == 9, a[n] == a[n - 1] a[n - 2]}, a[n], {n, 0, 15}]

a(n) = 9^fibonacci(n); \\ Jinyuan Wang, Apr 06 2019

a(n) = 9^Fibonacci(n).

cp's OEIS Frontend

A005614 The binary complement of the infinite Fibonacci word A003849. Start with 1, apply 0->1, 1->10, iterate, take limit.

Views

Author

Keywords

Comments

Examples

References

Links

Crossrefs

Programs

Haskell

Magma

Maple

Mathematica

PARI

PARI

Python

Formula

Extensions

A000301 a(n) = a(n-1)*a(n-2) with a(0) = 1, a(1) = 2; also a(n) = 2^Fibonacci(n).

Views

Author

Keywords

Comments

References

Links

Crossrefs

Programs

Haskell

Magma

Maple

Mathematica

PARI

SageMath

Formula

Extensions

A008346 a(n) = Fibonacci(n) + (-1)^n.

Views

Author

Keywords

Comments

Examples

Links

Crossrefs

Programs

GAP

Magma

Maple

Mathematica

PARI

Sage

Formula

A010098 a(n) = a(n-1)*a(n-2) with a(0)=1, a(1)=3.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Haskell

Magma

Maple

Mathematica

SageMath

Formula

A010100 a(n) = a(n-1)*a(n-2) with a(0)=1, a(1)=10.

Views

Author

Keywords

Comments

Links

Crossrefs

Programs

Maple

Mathematica

PARI

Formula

A214706 a(n) = a(n-1)*a(n-2) with a(0)=1, a(1)=5.