mathematica的画图问题

mathematica的画图问题

题目
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}]
答案
Do只执行过程,结果在内核中有,但不在笔记本中打印出来,加一个Print可以显示a = {Sin[1],2 Sin[1/2],3 Sin[1/3]};Do[a = Append[a,i Sin[1/i]];Print@ListPlot[a,PlotRange -> {0,2},PlotStyle -> PointSize[0.018]],...
举一反三
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
1,人们染上烟瘾,最终因吸烟使自己丧命.
最新试题
热门考点

超级试练试题库

© 2017-2019 超级试练试题库,All Rights Reserved.