教你利用R語言測試電腦的性能
更新時間：2021年04月22日 11:41:51 作者：育種數(shù)據(jù)分析之放飛自我
這篇文章主要介紹了利用R語言測試電腦的性能如何,通過矩陣的運算來計算，本文通過代碼講解的非常詳細(xì)，具有一定的參考借鑒價值，需要的朋友可以參考下
利用R語言測試電腦的性能如何
同事新配了一個電腦，想用R語言編寫一個程序，看一下電腦性能如何，讓我寫個代碼測試一下。
我能怎么樣，我也不懂如何測試電腦啊，那就計算一下矩陣的運算吧。因為我理解的電腦運行性能就是矩陣計算了。
編寫代碼
rm(list=ls())
set.seed(123)
# 設(shè)置矩陣的行數(shù)
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中的變量清空
- 設(shè)計隨機種子數(shù)，生成的隨機數(shù)就是一樣的
- 然后生成10000*10000的矩陣
- 測試1：矩陣求逆
- 測試2：矩陣相乘
- 測試結(jié)果是運行時間。
個人電腦
我的個人電腦是這個樣子滴：
- 矩陣求逆運行了
1011 - 秒矩陣相乘運行了
925秒
# 個人電腦，16G內(nèi)存
# > # 測試電腦性能
# > system.time({
# + # 矩陣求逆
# + ainv = solve(mat)
# + })
# 用戶 系統(tǒng) 流逝
# 1007.69 0.62 1011.49
# >
# >
# >
# > # 測試電腦性能
# > system.time({
# + # 矩陣相乘
# + re = mat %*% t(mat)
# + })
# 用戶 系統(tǒng) 流逝
# 915.02 0.75 925.86
服務(wù)器對比
- 矩陣求逆運行了
6.4 - 秒矩陣相乘運行了
3.32秒
# 公司服務(wù)器測試結(jié)果
# > # 測試電腦性能
# > system.time({
# + # 矩陣求逆
# + ainv = solve(mat)
# + })
# 用戶 系統(tǒng) 流逝
# 146.428 10.211 6.405
# > # 測試電腦性能
# > system.time({
# + # 矩陣相乘
# + re = mat %*% t(mat)
# + })
# 用戶 系統(tǒng) 流逝
# 79.945 10.179 3.323
1011s VS 4s！??！
貨比貨要扔……
補一刀
同事發(fā)過來一個CPU的天梯，我看了自己所在的位置，默默的關(guān)上了電腦：
到此這篇關(guān)于利用R語言測試電腦的性能如何的文章就介紹到這了,更多相關(guān)R語言性能測試內(nèi)容請搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持腳本之家！
相關(guān)文章
這篇文章主要介紹了R語言作圖之density plot(密度圖)的制作步驟,本文給大家介紹的非常詳細(xì)，對大家的學(xué)習(xí)或工作具有一定的參考借鑒價值，需要的朋友可以參考下2021-03-03
這篇文章主要介紹了R語言中aggregate?函數(shù)的相關(guān)資料,aggregate函數(shù)是數(shù)據(jù)處理中常用到的函數(shù)，具有強大的功能，可以按照要求把數(shù)據(jù)打組聚合，然后對聚合以后的數(shù)據(jù)進(jìn)行加和、求平均等各種操作，需要的朋友可以參考下2023-04-04
本文主要介紹了R語言向量下標(biāo)和子集的使用，文中通過示例代碼介紹的非常詳細(xì)，具有一定的參考價值，感興趣的小伙伴們可以參考一下2022-03-03
這篇文章主要介紹了R語言-有負(fù)下標(biāo)里才能有零的實例講解，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
本文將結(jié)合實例代碼，介紹R語言的Dataframe常用操作使用，文中通過示例代碼介紹的非常詳細(xì)，需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2021-06-06
R語言dplyr包之高效數(shù)據(jù)處理函數(shù)（filter、group_by、mutate、summarise）詳解
這篇文章主要介紹了R語言dplyr包之高效數(shù)據(jù)處理函數(shù)（filter、group_by、mutate、summarise）的相關(guān)知識，本文給大家介紹的非常詳細(xì)，對大家的學(xué)習(xí)或工作具有一定的參考借鑒價值，需要的朋友可以參考下2021-03-03
這篇文章主要介紹了R語言-如何給直方圖加標(biāo)簽，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
大數(shù)據(jù)分析R語言RStudio使用超詳細(xì)教程
RStudio是用于R編程的開源工具，這篇文章主要介紹了大數(shù)據(jù)分析R語言RStudio使用教程和一些RStudio的重要技巧，竅門和快捷方式，可快速將您變成RStudio高級用戶，感興趣的朋友跟隨小編一起看看吧2021-03-03
這篇文章主要介紹了基于R語言賦值符號的區(qū)別說明，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04
R語言-使用ifelse進(jìn)行數(shù)據(jù)分組
這篇文章主要介紹了R語言-使用ifelse進(jìn)行數(shù)據(jù)分組，具有很好的參考價值，希望對大家有所幫助。一起跟隨小編過來看看吧2021-04-04