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

水墨林

1. k = 2*10^9; d = 10; M = 2.19*10^9; P =
   ( E1 e! T  V9 v. j% t+ M$ z
2. 2.19*10^9; t = 1; h = 0.025; q = 1000;
   # a! Y5 p2 e) b' ?0 Q7 C
3. w = 0.01; r = 0.1
   ( U1 w# ?! _  ~1 q2 h; N; S
4. A = (3*M*P)/(M*P + 3*k*M + 3*k*P);8 k, h8 a+ B7 ~+ q) d\" c! {7 e
   
5. 
   ) `4 A9 V9 a# Q8 F8 Q6 G' F# q
6. B = (3*M)/(P + 3*k);
     X9 x( P1 \4 X, z
7. 
   - B# e- q: |% w  ~/ K( R3 p
8. Q = (3*k*M + 3*k*P + 7*M*P)/(M*P + 3*k*M + 3*k*P);
   & }4 \. |% {$ c7 r
9. s = (7*M + 6*k)/(P + 3*k);# Y: b2 e+ A5 H1 v7 a
   
10. a = E^((M*P*t + 3*k*M*t + 3*k*P*t)/(3*k*d + P*d))1 d1 A* p! l- k: h5 ~7 b# O4 K0 K
    
11. G = (z - h)/Sqrt[(r^2 + z^2 - 2*h*z + h^2)] - (z - h)/$ d9 G' a: I9 B8 e/ P) T
    
12.    Sqrt[(r^2 + h^2 + 2*h*z + z^2)];
      _7 Z5 H6 N, S# d
13. H = (z^3 - h^3 - 3*z^2*h + 3*h^2*z)/Power[z^2 - 2*h*z + h^2 + r^2, (
    6 t, @% p( x+ l5 \2 T5 z0 F$ E1 F
14.   3)^-1];
    8 F; K1 G7 T- ?7 D
15. U = (z^3 + 2*h*z^2 + z*h^2)/Power[z^2 + 2*h*z + h^2 + r^2, (3)^-1];
    - h- U$ I: p3 f3 l) ~  E
16. 6 D- H9 m+ |1 R$ d4 o
    
17. J = (18*h^2*z^3 + 18*h^3*z^2 + 6*h^4*z + 6*h*z^4)/Power[
    . ~0 W, f' `$ ?: V0 H
18.   z^2 + 2*h*z + h^2 + r^2, (5)^-1];
    9 i- \; ]6 v( l& B
19. M = 1 - h^3/Power[h^2 + w^2, (3)^-1];4 @/ V\" ~. L% c+ n
    
20. L[r_, z_] =
      g3 P) G( d  o5 \6 z9 D
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 - : n0 _# i% ]4 Z+ J\" P' X
    
22.    4*q*M*a*U*Q + 4*q*M*s*a*U + 4*q*M*s;. K& d6 z4 o+ y( T6 n4 F4 r
    
23. ContourPlot[c[r, z], {r, 0, 0.0001}, {z, 0.025, 0.035}]

复制代码

. g* r" {6 v; l9 x8 u3 m: o3 {7 b

newanswer

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

宏心

Syntax::bktmcp: Expression "[8W'|-c2_" has no closing "]".
0 o# ?  j( c3 v: A' n' r" e9 D0 d) S

宏心

Syntax::bktmcp: Expression "[8W'|-c2_" has no closing "]".
4 ~& R( _" a. V8 n