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

水墨林

1. k = 2*10^9; d = 10; M = 2.19*10^9; P = . d! X3 e3 O' O, c* U\" T) G. g\" I+ I% T
   
2. 2.19*10^9; t = 1; h = 0.025; q = 1000;6 n$ I/ s. c- c  }/ P, G$ P
   
3. w = 0.01; r = 0.1. z8 T5 t+ _9 c3 D
   
4. A = (3*M*P)/(M*P + 3*k*M + 3*k*P);
   : |  g\" J. i2 ~; g\" k, X
5. 7 m) X9 C& s/ _& X0 n1 p\" s) \/ q
   
6. B = (3*M)/(P + 3*k);
   & ^  k& z  q  J' Y& ^, g. w. X
7. ) ~. l* C7 z$ T9 }* N
   
8. Q = (3*k*M + 3*k*P + 7*M*P)/(M*P + 3*k*M + 3*k*P);0 k7 M) i% z  a\" i
   
9. s = (7*M + 6*k)/(P + 3*k);: R( g- c: }+ o2 C, q
   
10. a = E^((M*P*t + 3*k*M*t + 3*k*P*t)/(3*k*d + P*d))& N$ b8 H, |6 m- A1 v
    
11. G = (z - h)/Sqrt[(r^2 + z^2 - 2*h*z + h^2)] - (z - h)/
    ) _  X. w. C& D/ z& `* Y: m5 J
12.    Sqrt[(r^2 + h^2 + 2*h*z + z^2)];) `. t% @5 M8 ?% U5 F8 N0 U
    
13. H = (z^3 - h^3 - 3*z^2*h + 3*h^2*z)/Power[z^2 - 2*h*z + h^2 + r^2, (8 t  c2 s; D6 `* W3 m! I
    
14.   3)^-1];
    9 ?4 B: ]7 G$ B$ y) U5 [0 k
15. U = (z^3 + 2*h*z^2 + z*h^2)/Power[z^2 + 2*h*z + h^2 + r^2, (3)^-1];- o& n+ ~0 F7 `: |! V\" N2 F$ X
    
16. 
    & m\" u& t! M( p
17. J = (18*h^2*z^3 + 18*h^3*z^2 + 6*h^4*z + 6*h*z^4)/Power[
    8 B' a6 E$ P( J  w$ u' ~6 u
18.   z^2 + 2*h*z + h^2 + r^2, (5)^-1];! x* {' t5 ^: R; L1 s
    
19. M = 1 - h^3/Power[h^2 + w^2, (3)^-1];
    - S: ?; ^5 [; M( o2 B2 _\" m+ a$ V
20. L[r_, z_] = \" U$ J7 S1 P\" {- i1 e\" E
    
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 - , f0 l( F. G& q2 W
    
22.    4*q*M*a*U*Q + 4*q*M*s*a*U + 4*q*M*s;
    & ^5 Q/ C\" U0 z/ g* d
23. ContourPlot[c[r, z], {r, 0, 0.0001}, {z, 0.025, 0.035}]

复制代码

. U* j% {9 Y; I

newanswer

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

宏心

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

宏心

Syntax::bktmcp: Expression "[8W'|-c2_" has no closing "]".
* l* I  `. E) {, e+ K