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

水墨林

1. k = 2*10^9; d = 10; M = 2.19*10^9; P = 0 U- V$ x1 o\" U
   
2. 2.19*10^9; t = 1; h = 0.025; q = 1000;
   % l) X$ t- I' f- o* F5 K
3. w = 0.01; r = 0.1
   ( q; Y8 b1 V1 u! |2 D8 {) Y
4. A = (3*M*P)/(M*P + 3*k*M + 3*k*P);
     }4 h) ^\" h3 K3 p9 _- G
5. ; ?; O+ v' l8 u
   
6. B = (3*M)/(P + 3*k);
   % b2 `) d8 }  [* ^) H  w  }2 l
7. - t2 F$ d/ L, J$ G/ F: h
   
8. Q = (3*k*M + 3*k*P + 7*M*P)/(M*P + 3*k*M + 3*k*P);2 |% Z. @2 t' v  }
   
9. s = (7*M + 6*k)/(P + 3*k);
   . Q2 D1 }* `4 G% J% Q
10. a = E^((M*P*t + 3*k*M*t + 3*k*P*t)/(3*k*d + P*d)). W& W5 c- M  j0 L5 c
    
11. G = (z - h)/Sqrt[(r^2 + z^2 - 2*h*z + h^2)] - (z - h)/
    , ~6 ]9 U) V) E7 L9 O' K+ a' B& k: U! Z8 r
12.    Sqrt[(r^2 + h^2 + 2*h*z + z^2)];
    # v% q* \# \\" C, t1 H1 T
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 ^/ {- g( a% d0 w
    
14.   3)^-1];
    3 n9 W7 f$ P0 p* q. Q
15. U = (z^3 + 2*h*z^2 + z*h^2)/Power[z^2 + 2*h*z + h^2 + r^2, (3)^-1];5 _\" N( q* Q! }! A  w! R
    
16. 
    % O8 H* P7 \+ |' C* \. O5 j
17. J = (18*h^2*z^3 + 18*h^3*z^2 + 6*h^4*z + 6*h*z^4)/Power[
    % d0 H' \- t1 [* r9 O1 T
18.   z^2 + 2*h*z + h^2 + r^2, (5)^-1];7 Q, y9 e7 G) z3 [
    
19. M = 1 - h^3/Power[h^2 + w^2, (3)^-1];0 @# ?1 n% N0 x4 w  X$ f! C: H
    
20. L[r_, z_] =
    # n5 v: v6 l# O/ ^2 s4 e. e
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 `3 t# C8 I. B# s1 F
    
22.    4*q*M*a*U*Q + 4*q*M*s*a*U + 4*q*M*s;
    0 h0 H. q0 n\" }- {$ c. g% y
23. ContourPlot[c[r, z], {r, 0, 0.0001}, {z, 0.025, 0.035}]

复制代码

newanswer

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

宏心

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

宏心

Syntax::bktmcp: Expression "[8W'|-c2_" has no closing "]".
. \/ S6 d$ b& u) @6 b