如何在悬停时使工具提示仅显示ListLinePlot上的epilog值?

时间:2015-04-01 14:11:26

标签: tooltip wolfram-mathematica

所以,我有许多塞曼干涉图案的图像。我的任务是找到强度峰值的位置。我已经编写了一个可以找到最大值的脚本,所以我可以选择我需要的值" hand",但这将非常无聊,而且需要很长时间。

kep = Import["C:\Users\Martin\Documents\Egyetem\4. félév\Modern fizika \labor\6. Zeeman-effektus\sigma_50.png"];
adat = ImageData[kep, "Byte"][[577]][[All, 1]];
csucsok = N[FindPeaks[adat, 0.6, 0.6, 75]];
ListLinePlot[adat, AxesLabel -> {"Pixel", "Intenzitás"}, PlotLabel -> "sigma_50.png", ImageSize -> Large, PlotTheme -> "Classic", Epilog -> {Red, PointSize[0.008], Point[csucsok]}]

我会很高兴有一个小工具提示,显示红点(只有红点)的位置(x轴值),以及点击它们时的强度值(y轴),或鼠标是在他们身上。 有没有办法做到这一点?

1 个答案:

答案 0 :(得分:1)

可能会使您的Tooltip点成为单独的情节:

 data = Table[{i, RandomReal[{-1, 1}]}, {i, 20}];
 toplot = Select[data, #[[2]] > 0 & ];
 Show[{
      ListLinePlot[ data],
      ListPlot[Tooltip[toplot], PlotStyle -> {PointSize[.05], Red}]}]

(如果没有你的数据,我们真的无法看到你在做什么..)