教你利用R语言测试电脑的性能

这篇文章主要介绍了利用R语言测试电脑的性能如何,通过矩阵的运算来计算，本文通过代码讲解的非常详细，具有一定的参考借鉴价值，需要的朋友可以参考下

利用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