在mathematica中获取listplot的点数

Question

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

Answer 1

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

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

这可能是有益的

(*paste*)//FullForm

当然，你真的应该在生成情节之前保存数据..