Zum Inhalt springen

Datei:Vector Field on a Sphere.png

aus AufEinWort, der freien Forschung
    Originaldatei (1.200 × 1.200 Pixel, Dateigröße: 439 KB, MIME-Typ: image/png)

    Diese Datei stammt aus Wikimedia Commons und kann von anderen Projekten verwendet werden. Die Beschreibung von deren Dateibeschreibungsseite wird unten angezeigt.

    Beschreibung

    Beschreibung
    English: The vector field represented by 𝐟=2x𝐱̂+y2𝐲̂+z2𝐳̂ plotted over the unit sphere. Vectors have been uniformly scaled down to 0.2 times their original length for aesthetics. Originally created as an image for the example problem on the divergence theorem page to replace the less relevant image here.
    Datum
    Quelle Eigenes Werk
    Urheber Glosser.ca
    Andere Versionen
    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 „Vector Field on a Sphere.svg“ zu nennen – dann benötigt die Vorlage vector version available (bzw. vva) keinen Parameter.
    PNG‑Erstellung
    InfoField
     Dieses Diagramm wurde mit Mathematica erstellt.
    Quelltext
    InfoField

    Mathematica code

    scaling = 0.2;
    stepSize = 1/10;
    
    makeVectors[data_, f_] := Map[{Arrowheads[0.01], Arrow[{#, # + scaling*f @@ #}]} &, data]
    upperHemi[x_, y_] := Sqrt[1 - x^2 - y^2]
    lowerHemi[x_, y_] := -Sqrt[1 - x^2 - y^2]
    f[x_, y_, z_] := {2 x, y^2, z^2}
    
    upperPoints = 
      Flatten[Table[{x, y, upperHemi[x, y]}, {x, -1, 1, 
         stepSize}, {y, -Sqrt[1 - x^2], Sqrt[1 - x^2], stepSize}], 1] ;
    lowerPoints = 
      Flatten[Table[{x, y, lowerHemi[x, y]}, {x, -1, 1, 
         stepSize}, {y, -Sqrt[1 - x^2], Sqrt[1 - x^2], stepSize}], 1];
    
    upperVectors = makeVectors[upperPoints, f];
    lowerVectors = makeVectors[lowerPoints, f];
    
    Graphics3D[{{Opacity[0.8], Sphere[]}, {Opacity[0.7], 
       upperVectors~Join~lowerVectors}}, ViewPoint -> {Back, Top}, 
     Axes -> True, AxesLabel -> {x, y, z}, LabelStyle -> Directive[Large],
      ImageSize -> {1200, 1200}]
    

    Lizenz

    Public domain 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.

    In dieser Datei abgebildete Objekte

    Motiv

    Dateiversionen

    Klicke auf einen Zeitpunkt, um diese Version zu laden.

    Version vomVorschaubildMaßeBenutzerKommentar
    aktuell01:53, 5. Nov. 2011Vorschaubild der Version vom 01:53, 5. Nov. 20111.200 × 1.200 (439 KB)wikimediacommons>Rayhem

    Die folgende Seite verwendet diese Datei:

    Metadaten