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

水墨林

1. k = 2*10^9; d = 10; M = 2.19*10^9; P = % u) \# m, t# ^. g2 e$ n. d- }( ]' b
   
2. 2.19*10^9; t = 1; h = 0.025; q = 1000;
   6 V\" w\" m4 X1 F
3. w = 0.01; r = 0.1
   6 h1 L1 C% s7 t3 u
4. A = (3*M*P)/(M*P + 3*k*M + 3*k*P);$ ?) f2 h! Q% B( j
   
5. - \, r- @$ e' B7 y
   
6. B = (3*M)/(P + 3*k);
   \" Y) u2 Z0 B\" \/ B8 c3 d7 F8 w
7. 
   5 f' C$ X7 B6 J# }
8. Q = (3*k*M + 3*k*P + 7*M*P)/(M*P + 3*k*M + 3*k*P);% i/ q6 J, K( ?
   
9. s = (7*M + 6*k)/(P + 3*k);
   / f+ ?7 U% |8 Q* O# u$ q6 f
10. a = E^((M*P*t + 3*k*M*t + 3*k*P*t)/(3*k*d + P*d))2 m4 O! e* v* ~/ W3 g9 S& Z( j  l
    
11. G = (z - h)/Sqrt[(r^2 + z^2 - 2*h*z + h^2)] - (z - h)/
    ! S0 E4 ]3 z& j5 n) Z
12.    Sqrt[(r^2 + h^2 + 2*h*z + z^2)];: ]8 E% [5 }+ x
    
13. H = (z^3 - h^3 - 3*z^2*h + 3*h^2*z)/Power[z^2 - 2*h*z + h^2 + r^2, (/ U5 x3 T5 }  D0 N
    
14.   3)^-1];2 l' z0 Q% I; Y1 |+ D
    
15. U = (z^3 + 2*h*z^2 + z*h^2)/Power[z^2 + 2*h*z + h^2 + r^2, (3)^-1];
    7 H2 n4 E3 J\" T# U
16. . C6 u, c* D. i3 l4 C: ~- a8 `  w
    
17. J = (18*h^2*z^3 + 18*h^3*z^2 + 6*h^4*z + 6*h*z^4)/Power[2 a$ V0 A+ u* p7 B
    
18.   z^2 + 2*h*z + h^2 + r^2, (5)^-1];
    3 s! j4 \7 K0 u, P2 s
19. M = 1 - h^3/Power[h^2 + w^2, (3)^-1];
    . Z4 m- R, G- [2 B
20. L[r_, z_] = 3 ~1 E/ W7 X5 P# \( w
    
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 E( e6 t% L% O. R
22.    4*q*M*a*U*Q + 4*q*M*s*a*U + 4*q*M*s;
    5 Z# N% t8 ?1 d% B8 P/ Q
23. ContourPlot[c[r, z], {r, 0, 0.0001}, {z, 0.025, 0.035}]

复制代码

! F; t/ S/ y6 ^" h; V

newanswer

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

宏心

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

宏心

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