Dieses Bild des Typs Math sollte als Vektorgrafik im SVG-Format neu erstellt werden. Vektorformate haben zahlreiche Vorteile; weitere Information unter Commons:Media for cleanup. Wenn dir eine SVG-Version dieses Bildes vorliegt, so lade diese bitte hoch. Nach dem Hochladen der Datei ist diese Vorlage auf der aktuellen Bildbeschreibungsseite durch die Vorlage {{Vector version available}}, oder kürzer {{Vva}}, zu ersetzen. Es ist empfohlen die neue SVG-Datei „TorusSystoleLoop.svg“ zu nennen – dann benötigt die Vorlage vector version available (bzw. vva) keinen Parameter.
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);
Lizenz
Public domainPublic domainfalsefalse
Ich, der Urheberrechtsinhaber dieses Werkes, veröffentliche es als gemeinfrei. Dies gilt weltweit. In manchen Staaten könnte dies rechtlich nicht möglich sein. Sofern dies der Fall ist: Ich gewähre jedem das bedingungslose Recht, dieses Werk für jedweden Zweck zu nutzen, es sei denn, Bedingungen sind gesetzlich erforderlich.
Kurzbeschreibungen
Ergänze eine einzeilige Erklärung, was diese Datei darstellt.
{{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