Asymptote 精美图集

wayne

用Asymptote 做科学领域的图形，放在论文里，那绝对是最佳选择。
http://asymptote.sourceforge.net/

wayne

阴阳鱼：

1. size(0,25cm);
   
2. guide center=(0,1){W}..tension 0.8..(0,0){(1,-.5)}..tension 0.8..{W}(0,-1);
   
3. 
   
4. draw((0,1)..(-1,0)..(0,-1));
   
5. filldraw(center{E}..{N}(1,0)..{W}cycle);
   
6. unfill(circle((0,0.5),0.125));
   
7. fill(circle((0,-0.5),0.125));
   

复制代码

wayne

经典图形：

1. import graph3;
   
2. import grid3;
   
3. import palette;
   
4. currentprojection=orthographic(0.8,1,1);
   
5. size(400,300,IgnoreAspect);
   
6. defaultrender.merge=true;
   
7. real f(pair z) {return cos(2*pi*z.x)*sin(2*pi*z.y);}
   
8. surface s=surface(f,(-1/2,-1/2),(1/2,1/2),50,Spline);
   
9. draw(s,mean(palette(s.map(zpart),Rainbow())),black);
   
10. grid3(XYZgrid);

复制代码

wayne

这种区域的着色有什么软件能胜任呢？

1. size(200);
   
2. 
   
3. real w=1.35;
   
4. path[] p;
   
5. for(int k=0; k < 2; ++k) {
   
6.   int i=2+2*k;
   
7.   int ii=i^2;
   
8.   p[k]=(w/ii,1){1,-ii}::(w/i,1/i)::(w,1/ii){ii,-1};
   
9. }
   
10. path q0=(0,0)--(w,0.5);
    
11. path q1=(0,0)--(w,1.5);
    
12. draw(q0); draw(p[0]); draw(q1); draw(p[1]);
    
13. path s=buildcycle(q0,p[0],q1,p[1]);
    
14. fill(s,mediumgrey);
    
15. label("$P$",intersectionpoint(p[0],q0),N);
    
16. label("$Q$",intersectionpoint(p[0],q1),E);
    
17. label("$R$",intersectionpoint(p[1],q1),W);
    
18. label("$S$",intersectionpoint(p[1],q0),S);
    
19. label("$f > 0$",0.5*(min(s)+max(s)),UnFill);

复制代码

wayne

标签文字还可以三维环绕：

1. size(200);
   
2. import labelpath3;
   
3. path3 g=(1,0,0)..(0,1,1)..(-1,0,0)..(0,-1,1)..cycle;
   
4. path3 g2=shift(-Z)*reverse(unitcircle3);
   
5. string txt1="\hbox{This is \emph{wayne} 3D labels in
   
6. \textbf{Asymptote} (implemented with {\tt texpath}).}";
   
7. string txt2="Hello.world,I am wayne, this is http://bbs.emath.ac.cn.";
   
8. draw(surface(g),paleblue+opacity(0.5));
   
9. draw(labelpath(txt1,subpath(g,0,reltime(g,0.95)),angle=-90),orange);
   
10. draw(g2,1bp+red);
    
11. draw(labelpath(txt2,subpath(g2,0,3.9),angle=180,optional=rotate(-70,X)*Z));

复制代码

wayne

与时俱进，看我怎么玩转 东北狼版主的求和公式：

1. import three;
   
2. currentprojection=perspective(100,100,200,up=Y);
   
3. draw(scale3(4)*extrude("$\displaystyle\sum_{n=1}^{+\infty}
   
4. \frac{1}{k n^2-1}=\frac{1}{2}-\frac{\pi\cot (\frac{\pi }{\sqrt{k}})}{2 \sqrt{k}}$",2Z),blue);

复制代码

wayne

还可以作动画的哦：

wayne

不知道还有没有人记得我以前发的那个Klein瓶子的图哦，
http://bbs.emath.ac.cn/thread-1758-1-4.html

forcal

也推荐个隐函数作图器：
隐函数作图器IMPLICIT2D.EXE
隐函数作图器IMPLICIT3D.EXE

搜索一下就能找到，图形很精美。国产的。

wayne

9# forcal
难得啊，国内的软件。
只可惜也是要注册码的那种。

还是国外的好，放在网站上，用户直接下载，直接使用，没那么多恼人的限制