Finding the largest Fibonacci number less than x with repeat function

Question

I am new to the R programming and my skill with R is at intermediate level. I have been trying to solve question related to repeat function, but cant find any solution for it. I