|
|
COMMENTS
| Indices of the palindromic Fibonacci numbers are 0,1,2,3,4,5,6,10. - Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 29 2007.
Probably 55 is the last term. No further terms up to F(200000). - Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 29 2007.
Also, Luca proves that 0,1,1,2,3,5,8,55 are the only Fibonacci numbers containing a single distinct digit.
By running the following Magma code for 10 processor years, there are no further terms up to F(50000000). - Jason Kimberley (Jason.Kimberley@newcastle.edu.au), Dec 29 2010.
There are no further terms up to Fibonacci(10^8), found in 36 processor minutes. Note that one typically only needs to check a few digits at the start and the end to rule out being a palindrome. [D. S. McNeil, Dec 30 2010]
|
|
|
MATHEMATICA
| fQ[n_] := Block[{id = IntegerDigits@ Fibonacci@ n}, id == Reverse@ id]; lst = {}; Do[ If[ fQ@n, AppendTo[lst, n]], {n, 0, 1000}]; Fibonacci /@ lst (* Robert G. Wilson v *)
|
