请教ContourPlot出不了图这是为什么，代码如下，图如下

水墨林

1. k = 2*10^9; d = 10; M = 2.19*10^9; P =
   . e) B5 d: X5 t  Q6 G) z, w3 t
2. 2.19*10^9; t = 1; h = 0.025; q = 1000;+ d  o: N. _5 d6 ~: h5 D' E( Y
   
3. w = 0.01; r = 0.1
   : U- q9 W. J7 H2 S\" m+ u
4. A = (3*M*P)/(M*P + 3*k*M + 3*k*P);% G* V( Q3 c  X1 Z  [1 T. V  `2 R
   
5. 
   ( S+ K6 F4 v* A, `+ D
6. B = (3*M)/(P + 3*k);3 S2 Q* y* ?2 C
   
7. 
   ; h2 Q\" U; @# k5 a( h
8. Q = (3*k*M + 3*k*P + 7*M*P)/(M*P + 3*k*M + 3*k*P);
   ; s4 A: h$ |; ?# `( S: R1 v
9. s = (7*M + 6*k)/(P + 3*k);; }& c+ U/ w% o# F% T\" c( b& o
   
10. a = E^((M*P*t + 3*k*M*t + 3*k*P*t)/(3*k*d + P*d)), H* X9 j, N9 Y* \! B6 i
    
11. G = (z - h)/Sqrt[(r^2 + z^2 - 2*h*z + h^2)] - (z - h)/
    $ |. X  k: {0 I, |
12.    Sqrt[(r^2 + h^2 + 2*h*z + z^2)];
    0 j  z% p6 e6 A: Y, J) q' m
13. H = (z^3 - h^3 - 3*z^2*h + 3*h^2*z)/Power[z^2 - 2*h*z + h^2 + r^2, (
    1 b: P  \6 c$ ]\" _, D5 G+ k2 a  p5 S
14.   3)^-1];5 ?; j6 S2 n$ \8 j% i, D
    
15. U = (z^3 + 2*h*z^2 + z*h^2)/Power[z^2 + 2*h*z + h^2 + r^2, (3)^-1];/ c% W# u% B  C+ e/ e% J* X0 A3 A
    
16. 
    * y( n% y, }4 b3 S  M0 a
17. J = (18*h^2*z^3 + 18*h^3*z^2 + 6*h^4*z + 6*h*z^4)/Power[
    \" m\" K& Y) x4 e6 R! \8 x, b9 f
18.   z^2 + 2*h*z + h^2 + r^2, (5)^-1];  Z! l+ d- a. M3 I\" }
    
19. M = 1 - h^3/Power[h^2 + w^2, (3)^-1];
    + a1 w( s' ]  s
20. L[r_, z_] = 7 U' w; s0 M% ~
    
21.   4*q*M*A*G - 4*q*M*a*G*A + 4*q*M*a*G*B + 4*q*M*H + 4*q*M*U*Q -
    0 |% U5 U4 _& v/ ~9 r: r3 Q
22.    4*q*M*a*U*Q + 4*q*M*s*a*U + 4*q*M*s;
    % z- ?6 n) r; m* n6 S
23. ContourPlot[c[r, z], {r, 0, 0.0001}, {z, 0.025, 0.035}]

复制代码

0 x/ Q! \$ P% r# u% q; u7 i

newanswer

楼主，这个是想要用什么软件做图

宏心

Syntax::bktmcp: Expression "[8W'|-c2_" has no closing "]".
8 I. {3 T0 E: u

宏心

Syntax::bktmcp: Expression "[8W'|-c2_" has no closing "]".