zhb 发表于 2012-7-5 20:01

mathematica如何把不同取值范围的曲线画到同一个坐标系

求解求解,,,,本人刚开始学,,这个暑假要做课题,,,希望大家帮帮忙,

风筝11 发表于 2012-7-5 21:18

PlotRange->All

zhb 发表于 2012-7-5 22:19

风筝11 发表于 2012-7-5 21:18 static/image/common/back.gif
PlotRange->All

谢谢哈哈!!!!:$

zhb 发表于 2012-7-5 22:22

风筝11 发表于 2012-7-5 21:18 static/image/common/back.gif
PlotRange->All

那个。。我试了下,感觉不对的么。。。

风筝11 发表于 2012-7-5 22:25

每个都加 给我 看看你的代码吧

风筝11 发表于 2012-7-5 22:26

把几张图显示在一张图是用Show

zhb 发表于 2012-7-5 22:39

风筝11 发表于 2012-7-5 22:26 static/image/common/back.gif
把几张图显示在一张图是用Show

这个我也试过了不行哎。。因为画的图有根号,所以两个函数取值范围不一样,超过了这个范围就提示错误。真心不知道该怎么弄。

风筝11 发表于 2012-7-5 23:38

把代码给我 看看啊

zhb 发表于 2012-7-5 23:53

风筝11 发表于 2012-7-5 23:38 static/image/common/back.gif
把代码给我 看看啊

a11 = 3.609*10^7; a12 =
    2.284*10^8; a111 = 1.437*10^8; a112 = 6.630*10^8; a123 = -3.151*10^9; Q11 \
= 9.151*10^-2; Q12 = -4.013*10^-2; Q44 = 7.674*10^-2; S11 = 7.963*10^-12; S12 \
= -3.351*10^-12; S44 = 25.716*10^-12;
a11' = a11 + 0.5*((Q11^2 + Q12^2)S11 - 2Q11*Q12*S12)/(S11^2 - S12^2);
a33' = a11 + Q12^2/(S11 + S12);
a12' = a12 - 1/(S11^2 - S12^2)*((Q11^2 - Q12^2)S12 - 2*Q11*Q12*S12) + \
Q44^2/(2S44);
a13' = a12 + Q12(Q11 + Q12)/(S11 + S12);
a1' = a1 - S(Q11 + Q12)/(S11 + S12);
a3' = a1 - 2*S*Q12/(S11 + S12);
a1 = (25 - 360)/(2*8.85*10^-12*3.701*10^5);
P3' = 1/(3a111)*(-a3' + Sqrt);
P1' = 1/(6a111 + 6a112)*((-2a11' -
    a12') - Sqrt[(2a11' + a12')^2 - 12a1'*(a111 + a112)]);
Plot, {S, -0.016, 0.005}]
Plot, {S, -0.005, 0.016}]





把两条合并。

zhb 发表于 2012-7-6 00:23

zhb 发表于 2012-7-5 23:53 static/image/common/back.gif
a11 = 3.609*10^7; a12 =
    2.284*10^8; a111 = 1.437*10^8; a112 = 6.630*10^8; a123 = -3.151*10^9 ...

还有啊,
ContourPlot3D[(x^2 + (9 y^2)/4 + z^2 - 1)^3 - x^2 z^3 - (9 y^2 z^3)/
   80 == 0, {x, -1.5, 1.5}, {y, -1.5, 1.5}, {z, -1.5, 1.5}, 6 k8 d/ b0 v6 @9 b6 e) L9 X
PlotPoints -> 30, Axes -> False, Lighting -> False, ( }$ M1 W  T5 @# p. J$ z
ContourStyle -> {RGBColor}]这个是画心形图的。。。我的mathematica5.0好像画不出。。。
页: [1] 2 3 4
查看完整版本: mathematica如何把不同取值范围的曲线画到同一个坐标系