(*AnalyticalVectorField*)
{Uxyz,Vxyz,Wxyz}=
;
In[]:=
viewPoint={-1.3905547974450065`,-2.3982188664096786`,1.9403359565032412`};​​legend=Labeled[Rotate[ColorData["Rainbow","Image"],90°],{"max","min"},{Top,Bottom},ContentSize20];​​typeIλ1η2MS1=VectorDisplacementPlot3D[{Uxyz,Vxyz,Wxyz},{ξ,-1,1},{η,-1,1},{ζ,-1,1},PlotRange->Full,RegionBoundaryStyle->None,RegionFillingStyle->None,ColorFunction->"Rainbow",BoxRatios->Automatic,PlotStyle->{Opacity[1]},Boxed->False,Mesh->Automatic,Axes->False,Ticks->None,AxesLabel->{x,y,z},PlotRange->All,VectorSizes->1,Lighting"Neutral",ViewPoint->viewPoint,ImageSize->450]
Out[]=
mind=0.1;(******Discretizethevectorfield{Uxyz,Vxyz,Wxyz}******)​​list1=Table[{{ξ,η,ζ},{Uxyz,Vxyz,Wxyz}},{ξ,-1,1,mind},{η,-1,1,mind},{ζ,-1,1,mind}];
In[]:=
viewPoint={-1.3905547974450065`,-2.3982188664096786`,1.9403359565032412`};​​legend=Labeled[Rotate[ColorData["Rainbow","Image"],90°],{"max","min"},{Top,Bottom},ContentSize20];​​typeIλ2η5modeshape1=ListVectorDisplacementPlot3D[Flatten[list1,2],PlotRange->Full,RegionBoundaryStyle->None,RegionFillingStyle->None,ColorFunction->"Rainbow",BoxRatios->Automatic,PlotStyle->{Opacity[1]},Boxed->False,Mesh->Automatic,Axes->False,Ticks->None,ViewPoint->viewPoint,PlotRange->All,VectorSizes->1,Lighting"Neutral",ImageSize->900]​​
TetGenTetrahedralize
::reterr
:Tetrahedralize returned an error, 2.
​
DiscretizeRegion
:DiscretizeRegion 无法对区域
进行离散化处理.
ListVectorDisplacementPlot3D
:选项值 PlotPoints -> MeshCoordinatesDiscretizeRegion
,MaxCellMeasure{Volume0.6} 不是一个 >= 2 的整数.
Out[]=
ListVectorDisplacementPlot3D[Flatten[list1,2],PlotRangeFull,RegionBoundaryStyleNone,RegionFillingStyleNone,ColorFunctionRainbow,BoxRatiosAutomatic,PlotStyle{Opacity[1]},BoxedFalse,MeshAutomatic,AxesFalse,TicksNone,ViewPointviewPoint,PlotRangeAll,VectorSizes1,LightingNeutral,ImageSize900]
mind=0.1;(********whatIactuallyneed*****)​​list3=Table1.025`+0.024999999999999994`ζ+0.5`η-2.7755575615628914`*^-17ζη+0.49999999999999994`ξ,
3
2
+
3
η
2
,0.04330127018922193`+0.04330127018922193`ζ,{Uxyz,Vxyz,Wxyz},{ξ,-1,1,mind},{η,-1,1,mind},{ζ,-1,1,mind};
In[]:=
viewPoint={-1.3905547974450065`,-2.3982188664096786`,1.9403359565032412`};​​legend=Labeled[Rotate[ColorData["Rainbow","Image"],90°],{"max","min"},{Top,Bottom},ContentSize20];​​typeIλ2η5modeshape1=ListVectorDisplacementPlot3D[list3,PlotRange->Full,RegionBoundaryStyle->None,RegionFillingStyle->None,ColorFunction->"Rainbow",BoxRatios->Automatic,PlotStyle->{Opacity[1]},Boxed->False,Mesh->Automatic,Axes->False,Ticks->None,ViewPoint->viewPoint,PlotRange->All,VectorSizes->1,Lighting"Neutral",ImageSize->900]​​
ListVectorDisplacementPlot3D
:-1.11022×
-16
10
,0.,0.,-9.98923×
-13
10
,-1.54272×
-13
10
,4.32013×
-12
10
,{0.0025,0.,0.00433013},-3.68039×
-14
10
,-8.46257×
-13
10
,2.00909×
-12
10
,{0.005,0.,0.00866025},6.17853×
-13
10
,-1.31442×
-12
10
,4.51333×
-13
10
,{0.0075,0.,0.0129904},1.02138×
-12
10
,-1.5935×
-12
10
,-5.11285×
-13
10
,{0.01,0.,0.0173205},1.22465×
-12
10
,-1.71538×
-12
10
,-1.02149×
-12
10
,{0.0125,0.,0.0216506},1.27345×
-12
10
,-1.70909×
-12
10
,-1.20304×
-12
10
,{0.015,0.,0.0259808},1.20822×
-12
10
,-1.60079×
-12
10
,-1.16529×
-12
10
,{0.0175,0.,0.0303109},1.06414×
-12
10
,-1.41384×
-12
10
,-9.99728×
-13
10
,{0.02,0.,0.034641},8.71185×
-13
10
,-1.16871×
-12
10
,-7.82374×
-13
10
,{0.0225,0.,0.0389711},6.54031×
-13
10
,-8.83041×
-13
10
,-5.7146×
-13
10
,11,9,11,{{{{0.05,0.,0.},{0.00110402,-0.000296615,-0.00136962}},9,11},9,11},7,{1},11 不是一个有效的向量域数据集，也不是由数据集组成的有效列表.
Out[]=
ListVectorDisplacementPlot3D[list3,PlotRangeFull,RegionBoundaryStyleNone,RegionFillingStyleNone,ColorFunctionRainbow,BoxRatiosAutomatic,PlotStyle{Opacity[1]},BoxedFalse,MeshAutomatic,AxesFalse,TicksNone,ViewPointviewPoint,PlotRangeAll,VectorSizes1,LightingNeutral,ImageSize900]