Markers中标记的自定义间隔

Question

我正在尝试在Mathematica (ListLinePlot)的同一个图中绘制多个列表，并使用PlotMarkers和PlotLegend包来获得最终的数字。问题是，Mathematica为每个点都设置了一个标记，这使得很难区分哪个标记在图中的哪个位置。是否可以每n个样本出现一个绘图标记(例如，100点绘图每10个点出现一次)。

目前的指令是PlotMarkers->{Automatic，Small}。

Answer 1

如果要对打印标记的位置进行比Brett's answer更多的控制，则可能需要手动放置标记。Eg (修改Brett的例子)

data = Accumulate /@ RandomReal[{-1/2, 1}, {3, 100}];
col = {Red, Blue, Green};
decimate[i_] := {col[[i]], PointSize -> Medium, 
  Point /@ Transpose[{Range[1, 100, 10], data[[i, 1 ;; -1 ;; 10]]}]}
ListLinePlot[data, PlotStyle -> col, Epilog -> Table[decimate[i], {i, 3}]]

​

​

当然，你可以用任何你想要的图形对象来替换Point --比如Text，Inset等等。

Answer 2

我认为添加像Mesh->10这样的东西对你来说应该是可行的：

data = Accumulate /@ RandomReal[{-1/2, 1}, {3, 100}];
ListLinePlot[data, PlotMarkers -> {Automatic, Small}, Mesh -> 10]

​

​

Answer 3

还要记住，当您将鼠标指针移到标记坐标上时，可以使用Tooltip弹出标记坐标：

​

​