File:TorusSystoleLoop.png

原始檔案(1,078 × 887 像素,檔案大小:132 KB,MIME 類型:image/png


摘要

描述
English: A torus with varying tube radius with another torus indicating the smallest radius of the tube.
日期
來源 Own work using MATLAB
作者 RobHar
本圖片是以PNG、GIF或JPEG格式上傳。然而,其中包含的資料或訊息,應該重新建立成可縮放向量圖形SVG)檔案,以更有效率或更準確的方式儲存。如有可能,請上傳本圖片的SVG格式版本。在上傳之後,請修改維基各姊妹計畫中所有使用舊版圖片的條目(列在圖像連結章節中),替換為新版圖片,並在舊圖片的描述頁中加入{{Vector version available|新圖片名稱.svg}}模板,同時移除本模板。

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);

授權條款

Public domain 我,此作品的版權所有人,釋出此作品至公共領域。此授權條款在全世界均適用。
這可能在某些國家不合法,如果是的話:
我授予任何人有權利使用此作品於任何用途,除受法律約束外,不受任何限制。

說明

添加單行說明來描述出檔案所代表的內容

在此檔案描寫的項目

描繪內容

檔案歷史

點選日期/時間以檢視該時間的檔案版本。

日期/時間縮⁠圖尺寸使用者備⁠註
目前2008年12月19日 (五) 18:35於 2008年12月19日 (五) 18:35 版本的縮圖1,078 × 887(132 KB)RobHar{{Information |Description={{en|1=A torus with varying tube radius with another torus indicating the smallest radius of the tube.}} |Source=Own work using MATLAB |Author=RobHar |Date=2008-12-19 |Permission= |other_versions= }} <!--{{Image

下列頁面有用到此檔案:

全域檔案使用狀況

以下其他 wiki 使用了這個檔案: