剔除数据 - Mathematica - 悠闲数学娱乐论坛(第2版)

1^# 跳转到 »

发表于 2017-5-24 00:16 | 显示全部帖子

不用删，仅抽取部分来画就好了，比如说
ListLinePlot[Table[data[[100 k]], {k, 1, 100}], AspectRatio -> 1/2, PlotRange -> {{0, 10000}, {0, 2.5}}]
就是抽取100k的