利用R语言测试电脑的性能如何
同事新配了一个电脑，想用R语言编写一个程序，看一下电脑性能如何，让我写个代码测试一下。
我能怎么样，我也不懂如何测试电脑啊，那就计算一下矩阵的运算吧。因为我理解的电脑运行性能就是矩阵计算了。
编写代码
rm(list=ls())
set.seed(123)
# 设置矩阵的行数
n = 10000
# 生成一个矩阵
value = rnorm(n*n, 10,3)
mat = matrix(value,n,n)
# 测试电脑性能
system.time({
# 矩阵求逆
ainv = solve(mat)
})
# 测试电脑性能
system.time({
# 矩阵相乘
re = mat %*% t(mat)
})
代码解释
首先把R中的变量清空 设计随机种子数，生成的随机数就是一样的 然后生成10000*10000的矩阵 测试1：矩阵求逆 测试2：矩阵相乘 测试结果是运行时间。个人电脑
我的个人电脑是这个样子滴：
矩阵求逆运行了1011
秒矩阵相乘运行了925秒
# 个人电脑，16G内存
# > # 测试电脑性能
# > system.time({
# + # 矩阵求逆
# + ainv = solve(mat)
# + })
# 用户 系统 流逝
# 1007.69 0.62 1011.49
# >
# >
# >
# > # 测试电脑性能
# > system.time({
# + # 矩阵相乘
# + re = mat %*% t(mat)
# + })
# 用户 系统 流逝
# 915.02 0.75 925.86
服务器对比
矩阵求逆运行了6.4
秒矩阵相乘运行了3.32秒
# 公司服务器测试结果
# > # 测试电脑性能
# > system.time({
# + # 矩阵求逆
# + ainv = solve(mat)
# + })
# 用户 系统 流逝
# 146.428 10.211 6.405
# > # 测试电脑性能
# > system.time({
# + # 矩阵相乘
# + re = mat %*% t(mat)
# + })
# 用户 系统 流逝
# 79.945 10.179 3.323
1011s VS 4s！！！
货比货要扔……
补一刀
同事发过来一个CPU的天梯，我看了自己所在的位置，默默的关上了电脑：
