Wolfram 语言™

测量计算时间

测量计算所花费的时间.

In[1]:=

AbsoluteTiming[Total[Range[10000]]]

Out[1]=

使用 RepeatedTiming 决定重复某计算所花费的平均时间.

In[2]:=

RepeatedTiming[Total[Range[10000]]]

Out[2]=

比较用不同方法构建不同数组所花费的平均计算时间.

In[3]:=

funs = { Table[0, {i, #}, {j, #}] &, Map[Map[0 &, Range[#]], Range[#]] &, Scan[Scan[Sow[0], Range[#]], Range[#]] &, ConstantArray[0, {#, #}] &, Array[0 &, {#, #}] &, Outer[0 &, Range[#], Range[#]] & }; timings = First[ RepeatedTiming[#[100]]] & /@ funs;

In[4]:=

BarChart[timings, ChartLabels -> funs /. Function[head_[__]] :> head, PlotTheme -> "Marketing", ImageSize -> 500, ScalingFunctions -> "Log"]

Out[4]=