login
A139477
Number of binary digits in A001109(n).
0
1, 3, 6, 8, 11, 13, 16, 18, 21, 23, 26, 29, 31, 34, 36, 39, 41, 44, 46, 49, 51, 54, 56, 59, 62, 64, 67, 69, 72, 74, 77, 79, 82, 84, 87, 90, 92, 95, 97, 100, 102, 105, 107, 110, 112, 115, 118, 120, 123, 125
OFFSET
1,2
FORMULA
a(n) = A070939(A001109(n)). - Michel Marcus, Nov 02 2013
MATHEMATICA
a = {}; Do[k = Length[IntegerDigits[Expand[((2*Sqrt[2] + 3)^(n) - (3 - 2*Sqrt[2])^(n))/(4*Sqrt[2])], 2]]; Print[k]; AppendTo[a, k], {n, 1, 50}]; a
Rest[IntegerLength[#, 2]&/@LinearRecurrence[{6, -1}, {0, 1}, 60]] (* Harvey P. Dale, Feb 11 2015 *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Artur Jasinski, Apr 22 2008
EXTENSIONS
Incorrect link to index entries for linear recurrences with constant coefficients removed by Colin Barker, Oct 13 2015
STATUS
approved