login
A099401
Square root of a(n) contains the n-th Fibonacci number as a string of digits to the immediate right of the decimal point (excluding leading zeros).
0
10, 10, 5, 11, 21, 8, 124, 52, 54, 43, 24, 970, 297, 457, 467, 1520, 2516, 7269, 12414, 3804, 11048, 25020, 135635, 56389, 710228, 44151, 21082, 762684, 696414, 1085414, 6472621, 2979828, 15220551, 72130, 9934617, 79533387
OFFSET
1,1
EXAMPLE
a(1)= 10 because sqrt( 10)= 3.(1)622...
a(2)= 10 because sqrt( 10)= 3.(1)622...
a(3)= 5 because sqrt( 5)= 2.(2)360...
a(4)= 11 because sqrt( 11)= 3.(3)166...
a(5)= 21 because sqrt( 21)= 4.(5)825...
a(6)= 8 because sqrt( 8)= 2.(8)284...
a(7)= 124 because sqrt(124)=11.(13)55...
etc.
MATHEMATICA
Do[x = IntegerDigits[Fibonacci[n]]; i = 1; l = {}; While[l != x, d = RealDigits[N[Sqrt[i], 100]]; l = Take[Drop[First[d], Last[d]], Length[x]]; i++ ]; Print[i-1], {n, 1, 36}] (* Ryan Propper, Aug 11 2005 *)
CROSSREFS
Sequence in context: A071531 A276467 A112120 * A263450 A087028 A145279
KEYWORD
nonn,base
AUTHOR
Gil Broussard, Nov 17 2004
EXTENSIONS
Corrected and extended by Ryan Propper, Aug 11 2005
STATUS
approved