Question

这是我的Perl代码

$big=10_000_000;
#A:big loop outside
my $begin_time = time;
foreach my $i (1..$big) {
        foreach my $p (1..10){
        }
}
my $end_time = time;
my $t1=$end_time-$begin_time; 

#B:small loop outside
my $begin_time = time;
foreach my $i (1..10){
     foreach my $p (1..$big){
     }
}
my $end_time = time;
my $t2=$end_time-$begin_time; 

#output
print $t1;
print "\n";
print $t2;

t1 = 8秒
t2 = 3秒

mathematica代码：

Timing[Do[2, {i, 1, 10}, {j, 2*1, 10^7}]]
output:{14.328, Null}
Timing[Do[2, {j, 1, 2*10^7}, {i, 1, 10}]]
output:{30.937, Null}

为什么外面的大循环需要更多时间？

Answer 1

执行内部循环时会产生一定的开销（初始化变量;检查是否应该结束），在第一种情况下，您将丢失10,000,000次这样的开销;在第二个，你只做了10次。

编辑：设s为设置循环的时间（例如初始化变量）和i迭代循环的时间（例如测试结束条件）。然后：

大内圈

T = s1 + 10 * ( i1 + s2 + 10,000,000*i2 )
  = s1 + 10*i1 + 10*s2 + 100,000,000*i2

Big Outer Loop

T = s1 + 10,000,000 * ( i1 + s2 + 10*i2 )
  = s1 + 10,000,000*i1 + 10,000,000*s2 + 100,000,000*i2

<强>差分

diff = 9,999,990*i1 + 9,999,990*s2

因此，外部循环的迭代时间（i1）和内部循环的设置时间（s2）都使用大外循环执行9,999,990次大内圈。

为什么小循环中的大循环比大循环中的小循环更快？

1 个答案: