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

水墨林

1. k = 2*10^9; d = 10; M = 2.19*10^9; P =
   + D% q5 \& {& Y3 ?2 g3 T& }/ |/ e; z
2. 2.19*10^9; t = 1; h = 0.025; q = 1000;2 X1 k, [4 l6 o2 C
   
3. w = 0.01; r = 0.1+ ~5 X2 v& g! j9 B8 c. Q9 p
   
4. A = (3*M*P)/(M*P + 3*k*M + 3*k*P);: ?/ u: ^: J8 b3 ]' R
   
5. 4 M; F7 |7 |4 V- D: d+ f7 j
   
6. B = (3*M)/(P + 3*k);
   / D6 C3 Y7 t$ c
7.   I: P9 u* X6 ]; C: y. N
   
8. Q = (3*k*M + 3*k*P + 7*M*P)/(M*P + 3*k*M + 3*k*P);4 v7 J+ q$ ]7 {) j/ l
   
9. s = (7*M + 6*k)/(P + 3*k);
   . _' Y: N0 n5 o. I2 i- ~1 ?
10. a = E^((M*P*t + 3*k*M*t + 3*k*P*t)/(3*k*d + P*d))
    0 d; @0 B3 n3 l0 z2 S1 S2 M4 E$ ~
11. G = (z - h)/Sqrt[(r^2 + z^2 - 2*h*z + h^2)] - (z - h)/3 e2 C' n) F+ {& [! P$ S
    
12.    Sqrt[(r^2 + h^2 + 2*h*z + z^2)];+ ?6 L* X. @2 R
    
13. H = (z^3 - h^3 - 3*z^2*h + 3*h^2*z)/Power[z^2 - 2*h*z + h^2 + r^2, (
    : d: `1 ?, M1 k
14.   3)^-1];
    0 i+ V9 \- _# ^5 U! q# C0 }
15. U = (z^3 + 2*h*z^2 + z*h^2)/Power[z^2 + 2*h*z + h^2 + r^2, (3)^-1];5 B2 b5 q, X5 S- C6 {0 r
    
16. 
    & Z4 ?! B. ~: H0 N2 a
17. J = (18*h^2*z^3 + 18*h^3*z^2 + 6*h^4*z + 6*h*z^4)/Power[
    : ^; z1 U1 f8 V7 m4 [1 H
18.   z^2 + 2*h*z + h^2 + r^2, (5)^-1];% q( N  m3 z* U8 \
    
19. M = 1 - h^3/Power[h^2 + w^2, (3)^-1];5 K+ U7 g4 F9 M( q
    
20. L[r_, z_] =
    ' x' F! ~+ Q( N7 Q  D5 d; j6 K. C3 @
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 -
    + m4 Q/ L- _& e
22.    4*q*M*a*U*Q + 4*q*M*s*a*U + 4*q*M*s;
    0 }6 h\" ~( r, C( {$ A
23. ContourPlot[c[r, z], {r, 0, 0.0001}, {z, 0.025, 0.035}]

复制代码

3 Z9 x3 s8 ~  y  t: ~9 {

newanswer

楼主，这个是想要用什么软件做图
# d  C: w) U" k  p

宏心

Syntax::bktmcp: Expression "[8W'|-c2_" has no closing "]".
3 F8 R3 j3 [5 i" V

宏心

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