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э3Zxv,eKHM?oE*+25y_K V z.N\P\J-6,TC@Pp6m]WA~rTd ƿStF4k ړ^71#0ip̡j tN%avC5g\ ]4: U>ͅ/}