用Mathematica计算fibonacci数列2.2 Fibonacci 数列满足递推关系：Fn=Fn-1+Fn-2 设Gn=Fn/Fn+1,Rn=lnFn 在平面上画出点(n,Fn),(n,Gn),(n,Rn) 的散点图和折线图我知道有内置函数，但是我们现在做的是用迭代法求fibonacci数列。你的答案虽然可以求出答案，但显然不符合要求啊
问题描述：
用Mathematica计算fibonacci数列
2.2 Fibonacci 数列满足递推关系：Fn=Fn-1+Fn-2 设Gn=Fn/Fn+1,Rn=lnFn 在平面上画出点(n,Fn),(n,Gn),(n,Rn) 的散点图和折线图
我知道有内置函数，但是我们现在做的是用迭代法求fibonacci数列。你的答案虽然可以求出答案，但显然不符合要求啊
答
g[n_] := Fibonacci[n]/Fibonacci[n + 1]; r[n_] := Log[Fibonacci[n]]; lisfn = Table[Fibonacci[n],{n,10}]; lisgn = Table[g[n],{n,10}]; lisrn = Table[r[n],{n,10}]; ListLinePlot[{lisfn,lisgn,lisrn},Mesh ->...