r语言向量循环无数次并保留每次循环结果

为什么最后出来的结果都是0
> A9=function(n){
  • if(n>=1){
  • F=vector(length=n)
  • a=1/5
  • b=sqrt(5)
  • c=1/2+b/2
  • d=1/2-b/2
  • for(n in 1:n){
  • e=c^F
  • f=d^F
  • G=ab(e-f)
  • }
  • }
  • print(G)
  • }

    A9(n=6)

    出来的结果就是6个零
我把G换成F也还是一样
大家能帮我解答一下吗，就斐波那契函数，每一次循环都保留结果