在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

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