WOLFRAM

Wolfram言語 ＆ システムドキュメントセンター

アップグレード情報：

VectorFieldPlots`

バージョン7で，ベクトル場プロットパッケージはWolframシステムに統合された．

新しいシステム関数

VectorFieldPlotが組込みの Mathematica 関数VectorPlotとして利用できるようになった：

Version 6.0 << VectorFieldPlots`; VectorFieldPlot[{Sin[x], Cos[y]}, {x, 0, 2 Pi}, {y, 0, 2 Pi}]
Wolfram Language code: VectorPlot[{Sin[x], Cos[y]}, {x, 0, 2Pi}, {y, 0, 2Pi}]

VectorFieldPlot3Dが組込みの Mathematica 関数VectorPlot3Dとして利用できるようになった：

Version 6.0 << VectorFieldPlots`; VectorFieldPlot3D[{x, y, z}, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}]
Wolfram Language code: VectorPlot3D[{x, y, z}, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}]

VectorHeadsオプションの代りにVectorPlot3DのVectorStyleオプションが使われるようになった：

Version 6.0 << VectorFieldPlots`; VectorFieldPlot3D[{x, y, z}, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, VectorHeads -> False]
Wolfram Language code: VectorPlot3D[{x, y, z}, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}, VectorStyle -> Arrowheads[0]]

VectorFieldPlotおよびVectorFieldPlot3DのColorFunctionオプションの代りに新しいVectorColorFunctionオプションが使われるようになった：

Version 6.0 << VectorFieldPlots`; VectorFieldPlot[{Sin[x], Cos[y]}, {x, 0, 2 Pi}, {y, 0, 2 Pi}, ColorFunction -> Hue]
Wolfram Language code: VectorPlot[{Sin[x], Cos[y]}, {x, 0, 2Pi}, {y, 0, 2Pi}, VectorColorFunction -> Hue]

VectorPointsオプションを使って，プロットの中の評価点の数を増やす：

Version 6.0 << VectorFieldPlots`; VectorFieldPlot[{Sin[x], Cos[y]}, {x, 0, 2 Pi}, {y, 0, 2 Pi}, PlotPoints -> 20]
Wolfram Language code: VectorPlot[{Sin[x], Cos[y]}, {x, 0, 2Pi}, {y, 0, 2Pi}, VectorPoints -> 20]

GradientFieldPlot，GradientFieldPlot3D，HamiltonianFieldPlot，PolyaFieldPlotは以下の定義を使って置き換えることができる：

Version 6.0 << VectorFieldPlots`; GradientFieldPlot[Sin[x y], {x, 0, 1}, {y, 0, 1}]
Wolfram Language code: GradientFieldPlot[f_, {x_, xmin_, xmax_}, {y_, ymin_, ymax_}, opts : OptionsPattern[]] := VectorPlot[Evaluate[D[f, {{x, y}}]], {x, xmin, xmax}, {y, ymin, ymax}, opts]
Wolfram Language code: GradientFieldPlot[Sin[x y], {x, 0, 1}, {y, 0, 1}]
Version 6.0 << VectorFieldPlots`; GradientFieldPlot3D[x^2 + y^2 - z^2, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}]
Wolfram Language code: GradientFieldPlot3D[f_, {x_, xmin_, xmax_}, {y_, ymin_, ymax_}, {z_, zmin_, zmax_}, opts : OptionsPattern[]] := VectorPlot3D[Evaluate[D[f, {{x, y, z}}]], {x, xmin, xmax}, {y, ymin, ymax}, {z, zmin, zmax}, opts]
Wolfram Language code: GradientFieldPlot3D[x ^ 2 + y ^ 2 - z ^ 2, {x, 0, 1}, {y, 0, 1}, {z, 0, 1}]
Version 6.0 << VectorFieldPlots`; HamiltonianFieldPlot[Sin[x y], {x, 0, 2 \[Pi]}, {y, 0, 2 \[Pi]}]
Wolfram Language code: HamiltonianFieldPlot[f_, {x_, xmin_, xmax_}, {y_, ymin_, ymax_}, opts : OptionsPattern[]] := VectorPlot[Evaluate@{D[f, {y}], -D[f, {x}]}, {x, xmin, xmax}, {y, ymin, ymax}, opts]
Wolfram Language code: HamiltonianFieldPlot[Sin[x y], {x, 0, 2π}, {y, 0, 2π}]
Version 6.0 << VectorFieldPlots`; PolyaFieldPlot[Sin[x + I*y], {x, -1, 1}, {y, -1, 1}]
Wolfram Language code: PolyaFieldPlot[f_, {x_, xmin_, xmax_}, {y_, ymin_, ymax_}, opts : OptionsPattern[]] := VectorPlot[Evaluate@{Re[f], -Im[f]}, {x, xmin, xmax}, {y, ymin, ymax}, VectorScale -> {Automatic, Automatic, Log[#5 + 1]&}, opts]
Wolfram Language code: PolyaFieldPlot[Sin[x + I * y], {x, -1, 1}, {y, -1, 1}]