A221149 Decimal expansion of 3*log(phi)/log(1+sqrt(2)).

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

Offset

1,2

Comments

Fractal dimension of the Fibonacci word fractal.

Links

G. C. Greubel, Table of n, a(n) for n = 1..10000

Alexis Monnerot-Dumaine, The Fibonacci Word Fractal, HAL-00367972, February 2009, section 5.1.

José L. Ramírez, Gustavo N. Rubiano, and Rodrigo de Castro, A Generalization of the Fibonacci Word Fractal and the Fibonacci Snowflake, arXiv:1212.1368 [cs.DM], 2012-2014.

Index entries for transcendental numbers

Example

1.637938209676347011669771024581365...

Maple

evalf(3*log((1+sqrt(5))/2)/log(1+sqrt(2)), 120); # Muniru A Asiru, Oct 07 2018

Mathematica

RealDigits[(3*Log[GoldenRatio])/Log[1+Sqrt[2]], 10, 120][[1]] (* Harvey P. Dale, Jan 28 2013 *)

Prog

(PARI) 3*log((1+sqrt(5))/2)/log(1+sqrt(2)) \\ Charles R Greathouse IV, Mar 25 2014
(Magma) SetDefaultRealField(RealField(100)); 3*Log((1+Sqrt(5))/2)/Log(1 +Sqrt(2)); // G. C. Greubel, Oct 06 2018

Crossrefs

Sequence in context: A249542 A125123 A133612 * A070392 A248268 A115371

Adjacent sequences: A221146 A221147 A221148 * A221150 A221151 A221152

Keyword

nonn,cons

Author

N. J. A. Sloane, Jan 03 2013

Status

approved