mathematica的画图问题mathematica8里输好后执行没有显示,为什么?a = {Sin[1], 2 Sin[1/2], 3 Sin[1/3]};Do[a = Append[a, i Sin[1/i]]; ListPlot[a, PlotRange -> {0, 2}, PlotStyle -> PointSize[0.018]], {i, 4, 20}]
来源:学生作业帮助网 编辑:作业帮 时间:2024/11/29 02:35:27
xROPWOW7~