Reb*_*bin 4 plot wolfram-mathematica
不确定这是一个MMA错误还是我做错了什么.考虑以下功能:
plotTrace[points_] :=
ListPlot[points,
Joined -> True,
PlotMarkers -> Table[i, {i, Length@points}]]
Run Code Online (Sandbox Code Playgroud)
现在考虑传递RandomReal生成的值.即,考虑一下
RandomReal[1, {nTraces, nPointsPerTrace, 2(*constant = nDimensions*)}].
Run Code Online (Sandbox Code Playgroud)
如果nTraces为1,则显示我试过的所有nPointsPerTrace值的PlotMarkers:
Manipulate[
plotTrace[RandomReal[1, {1, nPointsPerTrace, 2}]],
{nPointsPerTrace, 1, 20, 1}]
Run Code Online (Sandbox Code Playgroud)
如果nTraces为3或更大,则为我尝试的所有nPointsPerTrace值显示绘图标记
Manipulate[plotTrace[RandomReal[1, {nTraces, nPointsPerTrace, 2}]],
{nTraces, 3, 20, 1}, {nPointsPerTrace, 1, 20, 1}]
Run Code Online (Sandbox Code Playgroud)
但是如果nTraces正好是2,那么无论nPointsPerTrace的值如何,我都看不到绘图标记:
Manipulate[plotTrace[RandomReal[1, {2, nPointsPerTrace, 2}]],
{nPointsPerTrace, 1, 20, 1}]
Run Code Online (Sandbox Code Playgroud)
提示,线索,建议将不胜感激!
它被PlotMarkers -> {1,2}
视为标记和大小,而不是两个标记:
In[137]:= ListPlot[{{1, 2, 3}, {4, 5, 6}}, PlotMarkers -> {1, 2}] // InputForm
Out[137]//InputForm=
Graphics[GraphicsComplex[{{1., 1.}, {2., 2.}, {3., 3.}, {1., 4.}, {2., 5.}, {3., 6.},
{1., 1.}, {2., 2.}, {3., 3.}, {1., 4.}, {2., 5.}, {3., 6.}},
{{{Hue[0.67, 0.6, 0.6], Inset[Style[1, FontSize -> 2], 7],
Inset[Style[1, FontSize -> 2], 8], Inset[Style[1, FontSize -> 2], 9]},
{Hue[0.9060679774997897, 0.6, 0.6], Inset[Style[1, FontSize -> 2], 10],
Inset[Style[1, FontSize -> 2], 11], Inset[Style[1, FontSize -> 2], 12]}, {}}}],
{AspectRatio -> GoldenRatio^(-1), Axes -> True, AxesOrigin -> {0, 0},
PlotRange -> {{0, 3.}, {0, 6.}}, PlotRangeClipping -> True,
PlotRangePadding -> {Scaled[0.02], Scaled[0.02]}}]
Run Code Online (Sandbox Code Playgroud)