| 查看: 425 | 回复: 1 | ||
yssfighting铜虫 (初入文坛)
|
[求助]
Mathematica实现施瓦兹映射问题 已有1人参与
|
|
请教一下给位高手，这个Mathematica中的程序哪里有问题，本来是要画映射图的，可是画不出图。恳请给位指点！ f[z_] = -i/2 z^(1/2) (z - 3); Needs["Graphics`Colors`"]; Needs["Graphics`ComplexMap`"]; g = CartesiaMap[f, {-3, 4, 0.5}, {0.00001, 2.00001, 0.2}, PlotStyle -> {Blue, Red}, Ticks -> {Range[-4, 2, 2], Range[0, 3, 3]}]; Graphics[PlotRange -> {{-2.5, 2.5}, {0, 1.5}}, AxesLabel -> {"u", "v"}, Ticks -> {Range[-2, 2, 1], Range[0, 2, 1]}, DisplayFunction -> $DisplayFunction] Print["The image of the upper half plane Im[z]>0 under thte mapping"]; Print["w=f[z]=", f[z]]; |
回复此楼» 猜你喜欢
0854AI CV方向招收调剂
已经有3人回复
-
求调剂323材料与化工
已经有3人回复
-
生物学学硕求调剂
已经有9人回复
-
289求调剂
已经有8人回复
-
07化学280分求调剂
已经有5人回复
-
300分，材料，求调剂，英一数二
已经有4人回复
-
【考研调剂】化学专业 281分，一志愿四川大学，诚心求调剂
已经有16人回复
-
0854电子信息求调剂
已经有7人回复
-
0854人工智能方向招收调剂
已经有3人回复
-
调剂
已经有4人回复
2楼2015-01-06 16:50:07
