wolfram-mathematica - 在mathematica中获取listplot的点

Question

我有一些图表需要相当长的时间进行计算。我想提取这些图的数据，而不是重新计算列表。我找到了命令pts=Cases[(*I paste graph here*),x_Line:>First@x,Infinity];，它适用于我的线图，但不适用于列表图。我怎样才能对列表图做同样的事情？

Answer 1

除了您使用点的散点图之外，它基本上是相同的：

Cases[(*pasted graphic*), x_Point :> First@x, Infinity]

这样做可能很有启发性

(*paste*)//FullForm

当然，您真的应该在生成绘图之前保存数据..