Rコード実行：システム時刻（）

Question

私はMatlabからRに移植したコードをいくつか持っていますが、その性能を比較したいと思います。

ただし、問題が発生しました。system.time()をRで使用していますが、同じコードに対して異なる結果が表示されます。これは起こるはずですか？どのように私はそれを比較するのですか？

Answer 1

自分の100mスプリントを走らせる時間があれば、違う結果になるでしょう！コンピュータには、コードを実行するのにかかる時間が多少異なるものがたくさんあります。

解決策は、コードを何度も実行することです。 Rパッケージbenchmarkはあなたが探しているものです。

Answer 2

@ジャスティンは言ったように、時は常に変化します。特にガベージコレクションシステムがあなたの特定の用途に適合していないため、初めてのカップルです。測定前にRを再起動して、他のプログラムを終了して、システムが現在ウイルスをスキャンしていないことを確認することをお勧めします...

測定時間が小さい場合（a秒）、相対誤差はかなり大きいので、少なくとも1秒かかるように問題を調整してください。

パッケージbenchmarkまたはrbenchmarkが役立ちます。

...しかし、私は通常、問題を回避するためにfor-loopを実行し、2秒ほどかかるまで調整します。その後、何回も実行します。ここで

は例です：

f <- function(x, y) { 
    sum <- 1 
    for (i in seq_along(x)) sum <- x[[i]] + y[[i]] * sum 
    sum 
} 

n <- 10000 
x <- 1:n + 0.5 
y <- -1:-n + 0.5 
system.time(f(x,y)) # 0.02-0.03 secs 

system.time(for(i in 1:100) f(x,y)) # 1.56-1.59 secs 

...ので、100回は相対誤差をたくさん減少し、それを呼び出します。