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

1011s VS 4s!!!

貨比貨要扔……

補一刀

同事發過來一個CPU的天梯,我看瞭自己所在的位置,默默的關上瞭電腦:

到此這篇關於利用R語言測試電腦的性能如何的文章就介紹到這瞭,更多相關R語言性能測試內容請搜索WalkonNet以前的文章或繼續瀏覽下面的相關文章希望大傢以後多多支持WalkonNet!