mathematica怎么画出散点图,折线图
来源:学生作业帮 编辑:百度作业网作业帮 分类:数学作业 时间:2024/07/16 02:16:55
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,PlotStyle -> PointSize[0.01]];
t3 = Table[r[i],{i,0,15}];
p3 = ListPlot[t2,PlotStyle -> PointSize[0.01]];
Show[p1,p2,p3]哪里不对?
怎么画折线图?
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,PlotStyle -> PointSize[0.01]];
t3 = Table[r[i],{i,0,15}];
p3 = ListPlot[t2,PlotStyle -> PointSize[0.01]];
Show[p1,p2,p3]哪里不对?
怎么画折线图?
![mathematica怎么画出散点图,折线图](/uploads/image/z/17219635-43-5.jpg?t=mathematica%E6%80%8E%E4%B9%88%E7%94%BB%E5%87%BA%E6%95%A3%E7%82%B9%E5%9B%BE%2C%E6%8A%98%E7%BA%BF%E5%9B%BE)
你的p3里面应该是画t3的散点图而不是t2
折线图可用Line
再问: 哦,折线那个具体点呗
折线图可用Line
再问: 哦,折线那个具体点呗