R_Language 板


LINE

[問題類型]: 效能諮詢(我想讓R 跑更快) [軟體熟悉度]: 入門(寫過其他程式,只是對語法不熟悉) [問題敘述]: 問題是關於運算速度的差異 1.在A function中又使用了B function作運算 Ex. r = abs(diff(P[(t-(N+1)):(t-1)])) sum(r)/N 2.先執行B function,將結果以b儲存,在將b用A function作運算 Ex. sum(abs(diff(P[(t-(N+1)):(t-1)])))/N 以上兩種寫法想請教一下,在執行的速度上會有很大的差異嗎? 小弟完整的程式中會是包更多個function 煩請大大們給予點建議,謝謝 ^^ [程式範例]: -- 離開你的視線~讓情緒完完整整的宣洩~ 我想今夜就這樣吧~ 反正孤獨也無所謂~ --



※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 61.228.141.5
※ 文章網址: https://webptt.com/m.aspx?n=bbs/R_Language/M.1441899128.A.3B9.html ※ 編輯: PhysicsBoy (61.228.141.5), 09/10/2015 23:32:35
1F:→ celestialgod: 少複製一次記憶體,應該有差 09/11 00:06
2F:→ celestialgod: 但是差異應該很小 09/11 00:06
3F:→ celestialgod: 你可以rbenchmark 1000次看看 09/11 00:07
4F:→ andrew43: 考慮程式碼開發與維護的成本常常比執行速度還重要很多。 09/11 13:57
5F:→ andrew43: 如果與都寫在一起,要除蟲或改寫會比較難。請考慮這點。 09/11 13:59
6F:→ celestialgod: 所以這時候要推薦magrittr 09/11 14:00
7F:→ celestialgod: P %>% '['((t-(N+1)):(t-1)) %>% diff %>% abs %>% 09/11 14:01
8F:→ celestialgod: sum %>% divide_by(N) 09/11 14:01
9F:→ celestialgod: magrittr可以在板上搜尋到介紹文章 09/11 14:01
10F:→ PhysicsBoy: 長知識了,有空來研究一下,至於維護就靠詳細筆記^^ 09/11 14:59
11F:推 andrew43: 注意程式碼過度相依的問題。只是原則沒有絕對。 09/11 21:41
12F:推 Edster: 什麼是程式碼過度相依? 09/11 23:13
13F:→ andrew43: 例如函數A裡使用函數B,如果函數B要改,就改函數B就好。 09/12 00:33
14F:→ andrew43: 若都寫在一起成函數C,想改變原本函數B的部份都要改寫。 09/12 00:36
15F:→ andrew43: 簡單來說,避免「牽一髮而動全身」就是了。 09/12 00:38
16F:→ andrew43: 至於相依,在這個例子不太明顯。在開發package可能會明 09/12 00:39
17F:→ andrew43: 白一點。 09/12 00:40
18F:→ celestialgod: 把a大的話翻譯一下,應該是重複使用的程式應該獨立 09/12 00:40
19F:→ celestialgod: 避免更改時只有更動到部分的block 09/12 00:40
20F:→ andrew43: 相依就像A函數的使用方法被B函數決定。一改B函數,A就錯 09/12 00:41
21F:→ andrew43: 了。 09/12 00:42
22F:→ celestialgod: 針對性的函數,不能一體適用... 09/12 00:42
23F:→ celestialgod: 這時候要考慮用class去做函數方法運用 09/12 00:43
24F:→ celestialgod: 或是加入case control避免更動其中一部分的函數 09/12 00:43
25F:→ celestialgod: 造成其他函數的結果出問題 或是 不正確運行 09/12 00:44
26F:→ andrew43: 這些都只是原則,沒有一定要怎麼做。好用好改就好。 09/12 00:45
27F:→ andrew43: 多謝c兄幫忙解釋。 09/12 00:45
28F:→ celestialgod: 我上次看dr的原始碼看得很痛苦= = 09/12 00:46
29F:→ celestialgod: 他東拆拆西拆拆都看不懂了...嘆氣... 09/12 00:47
30F:→ celestialgod: 我有時候也不懂到底拆分出常用的CODE是否真的會 09/12 00:48
31F:→ celestialgod: 比較好 09/12 00:48
32F:→ celestialgod: 我知道至少在修改跟維護上面會方便很多 09/12 00:49
33F:→ celestialgod: 在讀者眼中可能不見得是好事... 09/12 00:49
34F:→ celestialgod: 可能兩個稍微不同的CASE用同一個函數處理 09/12 00:50
35F:→ celestialgod: 可能要花很多時間去找相異之處 09/12 00:50
36F:→ celestialgod: 一切真的是看每個人 09/12 00:50
37F:→ andrew43: 如果看到作者的UML,說不定就秒看懂了~ 09/12 00:59
38F:→ celestialgod: 所以應該建議r package在打包時做network 09/12 01:14







like.gif 您可能會有興趣的文章
icon.png[問題/行為] 貓晚上進房間會不會有憋尿問題
icon.pngRe: [閒聊] 選了錯誤的女孩成為魔法少女 XDDDDDDDDDD
icon.png[正妹] 瑞典 一張
icon.png[心得] EMS高領長版毛衣.墨小樓MC1002
icon.png[分享] 丹龍隔熱紙GE55+33+22
icon.png[問題] 清洗洗衣機
icon.png[尋物] 窗台下的空間
icon.png[閒聊] 双極の女神1 木魔爵
icon.png[售車] 新竹 1997 march 1297cc 白色 四門
icon.png[討論] 能從照片感受到攝影者心情嗎
icon.png[狂賀] 賀賀賀賀 賀!島村卯月!總選舉NO.1
icon.png[難過] 羨慕白皮膚的女生
icon.png閱讀文章
icon.png[黑特]
icon.png[問題] SBK S1安裝於安全帽位置
icon.png[分享] 舊woo100絕版開箱!!
icon.pngRe: [無言] 關於小包衛生紙
icon.png[開箱] E5-2683V3 RX480Strix 快睿C1 簡單測試
icon.png[心得] 蒼の海賊龍 地獄 執行者16PT
icon.png[售車] 1999年Virage iO 1.8EXi
icon.png[心得] 挑戰33 LV10 獅子座pt solo
icon.png[閒聊] 手把手教你不被桶之新手主購教學
icon.png[分享] Civic Type R 量產版官方照無預警流出
icon.png[售車] Golf 4 2.0 銀色 自排
icon.png[出售] Graco提籃汽座(有底座)2000元誠可議
icon.png[問題] 請問補牙材質掉了還能再補嗎?(台中半年內
icon.png[問題] 44th 單曲 生寫竟然都給重複的啊啊!
icon.png[心得] 華南紅卡/icash 核卡
icon.png[問題] 拔牙矯正這樣正常嗎
icon.png[贈送] 老莫高業 初業 102年版
icon.png[情報] 三大行動支付 本季掀戰火
icon.png[寶寶] 博客來Amos水蠟筆5/1特價五折
icon.pngRe: [心得] 新鮮人一些面試分享
icon.png[心得] 蒼の海賊龍 地獄 麒麟25PT
icon.pngRe: [閒聊] (君の名は。雷慎入) 君名二創漫畫翻譯
icon.pngRe: [閒聊] OGN中場影片:失蹤人口局 (英文字幕)
icon.png[問題] 台灣大哥大4G訊號差
icon.png[出售] [全國]全新千尋侘草LED燈, 水草

請輸入看板名稱,例如:Tech_Job站內搜尋

TOP