mathematica怎么画出散点图,折线图f[n_] := f[n - 1] + f[n - 2];f[0] = 1; f[1] = 1;g[n_] := f[n]/f[n + 1];r[n_] := Log[f[n]];t1 = Table[f[i],{i,0,15}];p1 = ListPlot[t1,PlotStyle -> PointSize[0.01]];t2 = Table[g[i],{i,0,15}];p2 = ListPlot[t2,Pl
来源:学生作业帮助网 编辑:作业帮 时间:2024/09/09 18:30:33
x]KPƿʹwnڜ_!fL=`ADE ERQэ3Zx