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

水墨林

1. k = 2*10^9; d = 10; M = 2.19*10^9; P =   c+ ~2 f- j( c6 g! v9 p
   
2. 2.19*10^9; t = 1; h = 0.025; q = 1000;
     a2 Q, }0 V% @1 W( U
3. w = 0.01; r = 0.1
   & G4 o; G, I3 |# Z
4. A = (3*M*P)/(M*P + 3*k*M + 3*k*P);
   , x7 r2 @\" M5 I% K' i. Z
5. 
   1 E5 D, D2 X3 _9 b: c! d
6. B = (3*M)/(P + 3*k);
   - a7 ?. ], u; R3 c
7. ; k, e  o# Q/ v4 b4 V* Y5 Z1 n
   
8. Q = (3*k*M + 3*k*P + 7*M*P)/(M*P + 3*k*M + 3*k*P);4 ^& _8 m2 ?  D) ?& |: @
   
9. s = (7*M + 6*k)/(P + 3*k);! h! d# c$ }2 u3 P
   
10. a = E^((M*P*t + 3*k*M*t + 3*k*P*t)/(3*k*d + P*d))- b+ ^) K6 L/ z: }$ ~
    
11. G = (z - h)/Sqrt[(r^2 + z^2 - 2*h*z + h^2)] - (z - h)/
    ) N1 V- U- L5 n/ A' Y8 ]. X
12.    Sqrt[(r^2 + h^2 + 2*h*z + z^2)];
    ) \2 \+ c+ Z7 f3 I; O; q  H! ~. p6 a
13. H = (z^3 - h^3 - 3*z^2*h + 3*h^2*z)/Power[z^2 - 2*h*z + h^2 + r^2, (
    0 B7 F8 ^- c# Y( K% M3 k
14.   3)^-1];# V! P: q\" _; b1 J8 M
    
15. U = (z^3 + 2*h*z^2 + z*h^2)/Power[z^2 + 2*h*z + h^2 + r^2, (3)^-1];
    8 [9 P4 X! _5 e) K$ d
16. 
      O  i# b9 c9 w
17. J = (18*h^2*z^3 + 18*h^3*z^2 + 6*h^4*z + 6*h*z^4)/Power[
      R# Z! @! }6 W$ r( ]4 F  b
18.   z^2 + 2*h*z + h^2 + r^2, (5)^-1];
    : r  p4 T6 P4 i. ?  J
19. M = 1 - h^3/Power[h^2 + w^2, (3)^-1];
    * ]0 d6 q0 l; b
20. L[r_, z_] =
    . b4 }3 W/ H- B8 _& I% m: I+ C
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 - 4 ?) X$ |' m8 M0 y
    
22.    4*q*M*a*U*Q + 4*q*M*s*a*U + 4*q*M*s;
    2 n) P, A2 L% e% I  C5 L
23. ContourPlot[c[r, z], {r, 0, 0.0001}, {z, 0.025, 0.035}]

复制代码

newanswer

楼主，这个是想要用什么软件做图
3 ?% F# s' m: u2 J3 W8 S* N

宏心

Syntax::bktmcp: Expression "[8W'|-c2_" has no closing "]".
! F* ]5 B/ Y- I: r! R" |! x

宏心

Syntax::bktmcp: Expression "[8W'|-c2_" has no closing "]".
$ _" R4 n2 k  b6 X" \/ {1 a