經過時間
使用 system.time() 很方便,不過在比較多個函式呼叫時有其缺點。microbenchmark 套件提供的 microbenchmark() 可以解決這個問題。
本練習屬於課程
撰寫高效 R 程式碼
練習說明
工作空間中已提供 "movies.csv" 與 "movies.rds" 檔案。
- 使用
library()載入microbenchmark套件。 - 使用
microbenchmark()、read.csv()和readRDS(),比較匯入 CSV 檔與匯入 RDS 檔所需的時間。將結果存成名為compare的變數。- 在呼叫
microbenchmark()時,指定times = 10,讓每個函式呼叫 10 次。
- 在呼叫
- 列印
compare以查看結果。
動手互動練習
試著完成這個範例程式碼,體驗一下這個練習。
# Load the microbenchmark package
library(___)
# Compare the two functions
compare <- microbenchmark(___,
___,
times = ___)
# Print compare
___