|
Search: id:A099405
|
|
|
| A099405 |
|
Decimal part of 1/a(n) starts with Fibonacci(n) (leading zeros excluded). |
|
+0
2
|
|
| 6, 6, 4, 3, 2, 12, 72, 46, 29, 18, 112, 69, 428, 265, 1637, 1013, 626, 3869, 23913, 1478, 9135, 5646, 34895, 215662, 133288, 82377, 509116, 314652, 1944656, 1201864, 7427931, 4590715, 2837219, 17534976, 10837212, 66977653, 41394468, 25583188
(list; graph; listen)
|
|
|
OFFSET
|
1,1
|
|
|
EXAMPLE
|
a(1)= 6 -> 1/6=0.{1}666666...
a(2)= 6 -> 1/6=0.{1}666666...
a(3)= 4 -> 1/4=0.{2}500000...
a(4)= 3 -> 1/3=0.{3}333333...
a(5)= 2 -> 1/2=0.{5}000000...
a(6)=12 -> 1/12=0.0{8}33333...
a(7)=72 -> 1/72=0.0{13}8888...
a(25)=133288 -> 1/133288=0.00000{75025}508673, and Fib(25) is 75025
|
|
MATHEMATICA
|
f[n_] := Block[{fib = Fibonacci[n], k = 2, l = Floor[ Log[10, Fibonacci[n]] + 1]}, While[fib != FromDigits[ Take[ RealDigits[1/k, 10, 24][[1]], l]], k++ ]; k]; Table[ f[n], {n, 35}] (from Robert G. Wilson v Nov 19 2004)
|
|
CROSSREFS
|
Sequence in context: A019133 A094888 A019957 this_sequence A090966 A002421 A045885
Adjacent sequences: A099402 A099403 A099404 this_sequence A099406 A099407 A099408
|
|
KEYWORD
|
easy,nonn,base
|
|
AUTHOR
|
Gil Broussard (kikiriki(AT)mindspring.com), Nov 17 2004
|
|
EXTENSIONS
|
a(32) through a(38) from Robert G. Wilson v (rgwv(AT)rgwv.com), Nov 19 2004
|
|
|
Search completed in 0.002 seconds
|
