教你利用R語言測(cè)試電腦的性能
利用R語言測(cè)試電腦的性能如何
同事新配了一個(gè)電腦,想用R語言編寫一個(gè)程序,看一下電腦性能如何,讓我寫個(gè)代碼測(cè)試一下。
我能怎么樣,我也不懂如何測(cè)試電腦啊,那就計(jì)算一下矩陣的運(yùn)算吧。因?yàn)槲依斫獾碾娔X運(yùn)行性能就是矩陣計(jì)算了。
編寫代碼
rm(list=ls()) set.seed(123) # 設(shè)置矩陣的行數(shù) n = 10000 # 生成一個(gè)矩陣 value = rnorm(n*n, 10,3) mat = matrix(value,n,n) # 測(cè)試電腦性能 system.time({ # 矩陣求逆 ainv = solve(mat) }) # 測(cè)試電腦性能 system.time({ # 矩陣相乘 re = mat %*% t(mat) })
代碼解釋
- 首先把R中的變量清空
- 設(shè)計(jì)隨機(jī)種子數(shù),生成的隨機(jī)數(shù)就是一樣的
- 然后生成10000*10000的矩陣
- 測(cè)試1:矩陣求逆
- 測(cè)試2:矩陣相乘
- 測(cè)試結(jié)果是運(yùn)行時(shí)間。
個(gè)人電腦
我的個(gè)人電腦是這個(gè)樣子滴:
- 矩陣求逆運(yùn)行了
1011
- 秒矩陣相乘運(yùn)行了
925
秒
# 個(gè)人電腦,16G內(nèi)存 # > # 測(cè)試電腦性能 # > system.time({ # + # 矩陣求逆 # + ainv = solve(mat) # + }) # 用戶 系統(tǒng) 流逝 # 1007.69 0.62 1011.49 # > # > # > # > # 測(cè)試電腦性能 # > system.time({ # + # 矩陣相乘 # + re = mat %*% t(mat) # + }) # 用戶 系統(tǒng) 流逝 # 915.02 0.75 925.86
服務(wù)器對(duì)比
- 矩陣求逆運(yùn)行了
6.4
- 秒矩陣相乘運(yùn)行了
3.32
秒
# 公司服務(wù)器測(cè)試結(jié)果 # > # 測(cè)試電腦性能 # > system.time({ # + # 矩陣求逆 # + ainv = solve(mat) # + }) # 用戶 系統(tǒng) 流逝 # 146.428 10.211 6.405 # > # 測(cè)試電腦性能 # > system.time({ # + # 矩陣相乘 # + re = mat %*% t(mat) # + }) # 用戶 系統(tǒng) 流逝 # 79.945 10.179 3.323
1011s VS 4s?。。?/p>
貨比貨要扔……
補(bǔ)一刀
同事發(fā)過來一個(gè)CPU的天梯,我看了自己所在的位置,默默的關(guān)上了電腦:
到此這篇關(guān)于利用R語言測(cè)試電腦的性能如何的文章就介紹到這了,更多相關(guān)R語言性能測(cè)試內(nèi)容請(qǐng)搜索腳本之家以前的文章或繼續(xù)瀏覽下面的相關(guān)文章希望大家以后多多支持腳本之家!
相關(guān)文章
R語言多元Logistic邏輯回歸應(yīng)用實(shí)例
這篇文章主要給大家介紹了關(guān)于R語言多元Logistic邏輯回歸應(yīng)用的相關(guān)資料,文中通過示例代碼介紹的非常詳細(xì),對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2021-03-03R語言繪制corrplot相關(guān)熱圖分析美化示例及詳細(xì)圖解
這篇文章主要為大家介紹了R語言corrplot相關(guān)熱圖分析美化示例及詳細(xì)圖解,有需要的朋友可以借鑒參考下,希望能夠有所幫助,祝大家多多進(jìn)步,早日升職加薪2022-06-06R語言矩陣知識(shí)點(diǎn)總結(jié)及實(shí)例分析
在本篇文章里小編給各位整理了一篇關(guān)于R語言矩陣知識(shí)點(diǎn)總結(jié)及實(shí)例分析,對(duì)此有興趣的朋友們可以學(xué)習(xí)下。2021-04-04R語言創(chuàng)建矩陣的實(shí)現(xiàn)方法
這篇文章主要介紹了R語言創(chuàng)建矩陣的實(shí)現(xiàn)方法,文中通過示例代碼介紹的非常詳細(xì),對(duì)大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值,需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2021-03-03