OFFSET
1,2
COMMENTS
Questions: (1) Is this sequence infinite? (2) Are the gaps between the elements of this sequence bounded from above? (3) If this sequence is infinite, what is its asymptotic growth? (4) Consider the definition of this sequence for other values c instead of the golden ratio. What are the properties of this modified sequence?
EXAMPLE
trunc(phi^6) = 17, the 6th Fibonacci number is 8; the sum of their digits is the same, thus 6 is in the sequence.
MATHEMATICA
$MaxExtraPrecision = 10^9; fQ[n_] := Plus @@ IntegerDigits@Floor@(GoldenRatio^n) == Plus @@ IntegerDigits@Fibonacci@n; Select[ Range[6108], fQ[ # ] &] (* Robert G. Wilson v *)
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Stefan Steinerberger, Nov 07 2005
EXTENSIONS
Edited, corrected and extended by Robert G. Wilson v, Nov 16 2005
STATUS
approved