摘要

此math图片可使用矢量图形重新创建为SVG文件。这具有很多好处；更多信息请参见共享资源:待清理媒体。如果存在此图片的SVG格式，请将其上传，然后将此模板替换为{{vector version available|新图片名称}}。 建议您将SVG命名为“TorusSystoleLoop.svg”，这样在使用Vector version available（或Vva）模板时就不需要填写新图片名称参数。

Data file

This graphic was created in MATLAB using the following code:

%create u-v grid space
u=linspace(0,2*pi,120);
v=linspace(0,2*pi,120);
[u,v]=meshgrid(u,v);

R=0.5;                      %set large radius of torus
r=abs(cos(v/2))*0.2+0.05;   %set small radius to vary with angle

%parametrization
x=(R+r.*cos(u)).*cos(v);
y=(R+r.*cos(u)).*sin(v);
z=r.*sin(u);

H=surf(x,y,z);
hold on;			    %put a hold on this figure
set(H,'FaceColor',[0.25 0.25 0.75],'EdgeColor','none');
set(H,'SpecularColorReflectance', 0.2, 'DiffuseStrength', 0.8);
set(H,'AmbientStrength', 0.3,'FaceLighting','phong');
set(H,'SpecularExponent', 100);

daspect([1 1 1]);   %set ratio of x,y,z axes
axis tight;         %fit axes to figure
axis off;           %don't show axes
view(190, 40);      %set viewing angle
camlight (-50, 54); lighting phong; %add light source

%add another torus to show tightest place on the torus
R2=0.075;
r2=0.025;

x2=(R2+r2.*cos(u)).*cos(v)-0.5;
y2=r2.*sin(u);
z2=(R2+r2.*cos(u)).*sin(v);

H2=surf(x2,y2,z2);
set(H2,'FaceColor',[0.75 0.25 0.25],'EdgeColor','none');
set(H2,'SpecularColorReflectance', 0.2, 'DiffuseStrength', 0.8);
set(H2,'AmbientStrength', 0.5,'FaceLighting','phong');
set(H2,'SpecularExponent', 100);

许可协议

我，本作品著作权人，释出本作品至公有领域。这适用于全世界。 在一些国家这可能不合法；如果是这样的话，那么： 我无条件地授予任何人以任何目的使用本作品的权利，除非这些条件是法律规定所必需的。