|
|
A100022
|
|
Number of digits in A090162(n).
|
|
1
|
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
FORMULA
|
|
|
MATHEMATICA
|
f[n_] := Floor[ Log[10, Binomial[ Fibonacci[2n]Fibonacci[2n + 1], Fibonacci[2n - 1]Fibonacci[2n] - 1]] + 1]; Do[ Print[ f[n]], {n, 9}] (* Robert G. Wilson v, Nov 23 2004 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|