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

水墨林

1. k = 2*10^9; d = 10; M = 2.19*10^9; P =
   3 X9 ]: C5 R. k
2. 2.19*10^9; t = 1; h = 0.025; q = 1000;
   ! K  O) \0 D* M7 {) b9 c
3. w = 0.01; r = 0.13 P3 C9 l5 W, T7 \# r7 {
   
4. A = (3*M*P)/(M*P + 3*k*M + 3*k*P);
   8 J3 e4 _3 T. ?' z' Q
5. : B* C/ s8 r2 _
   
6. B = (3*M)/(P + 3*k);) D' k/ f* _6 R4 W2 U: Q\" Z
   
7. 
   $ \/ _( w4 a5 z' p1 \- k: x' N# v
8. Q = (3*k*M + 3*k*P + 7*M*P)/(M*P + 3*k*M + 3*k*P);
   * [% m! N5 i: R  m: E
9. s = (7*M + 6*k)/(P + 3*k);
   + \+ s4 F1 G$ I3 C+ X+ n
10. a = E^((M*P*t + 3*k*M*t + 3*k*P*t)/(3*k*d + P*d))
    + n6 C; s\" e4 L8 i# v' a
11. G = (z - h)/Sqrt[(r^2 + z^2 - 2*h*z + h^2)] - (z - h)/
    1 S7 m! K- j+ c4 g# I( k- s+ d
12.    Sqrt[(r^2 + h^2 + 2*h*z + z^2)];) F; V8 B5 A! N+ N. j) Y2 @
    
13. H = (z^3 - h^3 - 3*z^2*h + 3*h^2*z)/Power[z^2 - 2*h*z + h^2 + r^2, (
    5 p' Q& J) i# c1 v
14.   3)^-1];
    $ W/ \) c. q* u& W# k3 B: S
15. U = (z^3 + 2*h*z^2 + z*h^2)/Power[z^2 + 2*h*z + h^2 + r^2, (3)^-1];
    5 U& _) [\" E4 F$ J
16. , G5 I/ p1 j0 B( s; M
    
17. J = (18*h^2*z^3 + 18*h^3*z^2 + 6*h^4*z + 6*h*z^4)/Power[1 }- d/ V  O0 i/ E5 v# X8 n7 p$ U2 v
    
18.   z^2 + 2*h*z + h^2 + r^2, (5)^-1];0 z. p, d- I/ q9 E! M' h& J; t! y) }
    
19. M = 1 - h^3/Power[h^2 + w^2, (3)^-1];
    8 L1 P6 a\" g2 M# O7 i, A7 U$ x1 b
20. L[r_, z_] =
    $ ^, j\" K$ G- N# ~9 a3 Y& B
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 -   @% \. d  m  j& l# X( o& [
    
22.    4*q*M*a*U*Q + 4*q*M*s*a*U + 4*q*M*s;
    5 g; U' ^4 L# r6 j
23. ContourPlot[c[r, z], {r, 0, 0.0001}, {z, 0.025, 0.035}]

复制代码

; V6 c6 a( @2 k$ H* B  N

newanswer

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

宏心

Syntax::bktmcp: Expression "[8W'|-c2_" has no closing "]".
6 F2 N3 l# D- q1 K: z. E

宏心

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