运行用时

使用 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
___

编辑并运行代码