A190796 Number of digits in the minimal base-phi representation of n.

1, 4, 5, 5, 8, 8, 9, 9, 9, 9, 9, 12, 12, 12, 12, 12, 12, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 13, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17, 17

Offset

1,2

Comments

See A130600(n) for the digits in the minimal base phi representation of n.

Links

T. D. Noe, Table of n, a(n) for n = 1..1000

Formula

a(n) = A055778(n) + A133775(n).

a(n) <= 2 * ceiling( log(n) / log(phi) ) for n > 1.

Mathematica

nn = 100; len = 2*Ceiling[Log[GoldenRatio, nn]]; Table[d = RealDigits[n, GoldenRatio, len]; last1 = Position[d[[1]], 1][[-1, 1]]; last1, {n, 1, nn}]

Crossrefs

Cf. A055778, A130600, A133775.

Sequence in context: A071570 A336047 A082448 * A070783 A198334 A055593

Adjacent sequences: A190793 A190794 A190795 * A190797 A190798 A190799

Keyword

nonn,base

Author

T. D. Noe, May 20 2011

Status

approved