Mathematica中文论坛-非官方

标题: matlab 豆粑粑　plot 3D ring [打印本页]

---

作者: meatball1982    时间: 2018-3-20 21:21
标题: matlab 豆粑粑　plot 3D ring


别人的问题，
http://www.ilovematlab.cn/thread-538722-1-1.html
如何画一个ring.


透明的。

1. clear all
   
2. clc
   
3. clf
   
4. 
   
5. 
   
6. u=linspace(0,2*pi,500);
   
7. 
   
8. v=linspace(0,2*pi,500);
   
9. 
   
10. [uu vv]=meshgrid(u,v);
    
11. 
    
12. x=(2+cos(uu)).*cos(vv);
    
13. 
    
14. y=(2+cos(uu)).*sin(vv);
    
15. 
    
16. z=sin(uu);
    
17. 
    
18. h=surf(x,y,z,1.5*ones(size(x)),'edgecolor','none');
    
19. alpha(h,0.8)
    
20. shading interp
    
21. camlight
    
22. axis equal
    
23. colormap(jet)
    
24. box off
    
25. axis off
    
26. view(40,25)
    
27. 
    
28. h=gcf;
    
29. fig_na = ['./fig_cir_green'];
    
30. fun_work_li_035_myfig_out(h,fig_na,3);

复制代码

update: tubeplot 2 plot a tube with different color.

1. clear all
   
2. clc
   
3. clf
   
4. 
   
5. 
   
6. u=linspace(0,2*pi,100);
   
7. 
   
8. v=linspace(0,2*pi,100);
   
9. 
   
10. [uu vv]=meshgrid(u,v);
    
11. 
    
12. x=(2+cos(uu)).*cos(vv);
    
13. 
    
14. y=(2+cos(uu)).*sin(vv);
    
15. 
    
16. z=sin(uu);
    
17. 
    
18. hold on
    
19. h=surf(x,y,z,cos(x/2).*sin(y),'edgecolor','none');
    
20. 
    
21. colormap(jet)
    
22. 
    
23. 
    
24. t=0:(2*pi/1000):(2*pi);
    
25. x=cos(t*2).*(3+sin(t*3)*.3);
    
26. y=sin(t*2).*(4+sin(t*3)*.3);
    
27. z=cos(t*3)*.3;
    
28. 
    
29. tubeplot(x,y,z,0.05*ones(size(t)),0.3*sin(t),40)
    
30. axis equal
    
31. alpha(h,0.6)
    
32. shading interp
    
33. camlight
    
34. axis equal
    
35. colormap(jet)
    
36. box off
    
37. axis off
    
38. view(40,25)
    

复制代码

tubeplot要修改一下其中的surf

1.       surf(X,Y,Z,V,'edgecolor','none');

复制代码

tubeplot.zip

2018-3-22 09:57 上传

点击文件名下载附件

3.4 KB, 下载次数: 0

---

欢迎光临 Mathematica中文论坛-非官方 (http://ilovemathematica.com/)

Powered by Discuz! X3.2