本圖片是以PNG、GIF或JPEG格式上傳。然而，其中包含的資料或訊息，應該重新建立成可縮放向量圖形（SVG）檔案，以更有效率或更準確的方式儲存。如有可能，請上傳本圖片的SVG格式版本。在上傳之後，請修改維基各姊妹計畫中所有使用舊版圖片的條目（列在圖像連結章節中），替換為新版圖片，並在舊圖片的描述頁中加入{{Vector version available|新圖片名稱.svg}}模板，同時移除本模板。

描述Vector Field on a Sphere.png	English: The vector field represented by ${\displaystyle \mathbf {f} =2x{\hat {\mathbf {x} }}+y^{2}{\hat {\mathbf {y} }}+z^{2}{\hat {\mathbf {z} }}}$ 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.
日期	2011年11月5日
來源	自己的作品
作者	Glosser.ca
其他版本	本圖片是以PNG、GIF或JPEG格式上傳。然而，其中包含的資料或訊息，應該重新建立成可縮放向量圖形（SVG）檔案，以更有效率或更準確的方式儲存。如有可能，請上傳本圖片的SVG格式版本。在上傳之後，請修改維基各姊妹計畫中所有使用舊版圖片的條目（列在圖像連結章節中），替換為新版圖片，並在舊圖片的描述頁中加入{{Vector version available|新圖片名稱.svg}}模板，同時移除本模板。

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

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}]