碎碎念

台灣實做Java與R結合的人好像不多 每次有問題上google查詢都只找到國外的討論

希望能有更多的人做這方面的研究 但也可能因為R的界面不是那麼親民(必竟是免費) 都是要下指令的

但R可以做的運算不比spss,SAS,Modeler差啊

而且又有很多好心人寫好的package 這樣子工程師就不用那麼辛苦了不是嗎

例如我那天看到一篇論文 是一個工工所的人用java硬寫出類神經網路來預測個股的買賣點

天哪 我想都不敢想 如果我用java寫那不就寫到我曾孫都取媳婦了

如果他知道可以用java call R，然後再把R類神經網路package load進來，資料丟進去，R就算好了

這樣大概一天就寫完了吧 不知道那個人拚了多久 希望他永遠不知道有這個方法 不然他應該會去撞牆或咬舌自盡

留言

  1. 瑞球2013年10月9日 下午2:35

    你的部落格要這麼專業嗎
    我看了標題 只按了碎碎念這篇
    結果進來看還是在寫程式!
    你再降我要封鎖你了啦~

    回覆刪除
  2. 淘氣阿丹不淘氣2013年10月10日 凌晨1:20

    哈哈 真的，只有這篇看起來正常，結果進來之後也很不正常。

    回覆刪除
  3. XYT2013年10月16日 中午12:51

    還是我要開始寫食記

    但是我不想跟教官競爭~

    回覆刪除
  4. 淘氣阿丹不淘氣2013年10月16日 下午1:06

    哈哈跟教官有什麼競爭

    回覆刪除

張貼留言

這個網誌中的熱門文章

R中Try and Catch的寫法

圖片
在R裡的Try and Catch可能比較少人用到 因為R code出現錯誤時不會導致R整個停機 只會出現錯誤訊息 而且可以繼續運作 但是因為我的系統是用Java去call R，R如果有error會停止運作然後害我整個系統死機 所以我需要一個方法可以先楨測我的R code有沒有error，如果有錯就不往下執行了 範例如下: 如果我直接在R裡面執行 a<-'abc' b<-1 c<-b/a 會看直接看到錯誤，因為我不能把字串去除以一個數值 所以我加了try and catch之後 Erroresult<- tryCatch({ a<-'abc' b<-1 c<-b/a }, warning = function(war) { print(paste("MY_WARNING: ",war)) }, error = function(err) { print(paste("MY_ERROR: ",err)) }, finally = { print(paste("End Try&Catch")) }) 結果就會像這樣了，Error已經不是紅色，而是一個字串輸出，可以像我一樣把tryCatch的結果再另存到一個變數，例如Erroresult，這樣你就可以把這個error message存著 Try and Catch的架構像這樣，其中warning,error,finally的結構一定要有，不然會報錯 tryCatch({ #要執行的指令放這裡 },warning = function(war){ print(paste("MY_WARNING: ",war)) #如果有warning則輸出warning,"MY_WARNING: "這一行可以自己改 },error = function(err) { print(paste("MY_ERROR: ",err)) #如果有error則輸出error,"
閱讀完整內容

如何將DSM(NAS)變成Mail Server

圖片
最近我的法國老闆指派給我一個新的任務 他想要把家裡的NAS變成mail server 從此以後收發mail不求人 說這樣子就有自由了(法國人可以不要動不動就扯到自由嗎) 身為家裡的資訊長兼軟體工程師兼財務長兼保潔阿姨 這個工作派下來之後我還真不曉得可以指派給誰 只好自己動手了 其實我也沒有設定過mail Server 都是從骨哥大師那裡查到一個一個步驟 撞牆之後再查一次 設定了好幾天以後終於成功了 用手機或是email軟體都可以收發才算大功告成 發現沒有人把整個流程寫下來 那我就來寫吧 多做善事看能不能以後不要下地獄 或是下了地獄至少不要上刀山下油鍋 當個觀眾就可以了 希望閰王爺有看到這一篇blog 我選擇用中華電信申請浮動ip送的固定ip + 去登記一個自已喜歡的網域來處理 申請網域的公司是法國老闆選的這家 gandi 我覺得服務很不錯啊  鄉民可以參考看看 首先我設定讓DSM可以自動撥號連網 取得固定ip  在DSM的應用程式裡面 選擇EZ-INTERNET 一開始會請你設定可以通過防火牆的port有那些 記得要把 mail server 跟 mail station 打勾 然後填入中華電信的帳號密碼 設定完成以後 你的DSM就可以自動撥號取得一組ip 假設是112.77.115.94 然後要到申請網域公司的網站 例如我就是到 gandi 去設定很重要的MX碼，同時也告訴gandi要把我註冊的網域跟我的ip連在一起哦 以gandi的介面為例，假設我申請了一個網域叫做abc.com 就要有一個 A type recored Name @ , Value "你的ip" 然後要有一個MX recored Name @ Value abc.com. 這樣子就等於是宣告所有寄到@abc.com的信都要指到112.77.115.94這個位址 因為我的法國老板喜歡@後面直接接網域名稱abc.com 所以要用@來設定 如果你想要設定成例如 email.abc.com 就要把 A type recored Name 改成 email, Value "你的ip" 對應的MX recored Name email, Value abc.com. 以此類推 鄉民們可以看到 我還另外
閱讀完整內容

使用VBA記錄股市每分鐘的交易記錄

其實也是一個很簡單的程式，但是看起來就不像是高手寫的，因為一直跳來跳去 假設工作表2是DDE的資料，將DDE的資料每分鐘copy到工作表1 Dim i As Single '宣告變數i Dim Workday As Integer  '宣告變數Workday Private Sub workbook_open() '當這個excel檔案打開時，執行以下程序 Workday = Application.Evaluate("WEEKDAY(TODAY())-1")     '算出今天是一星期中的第幾天，並將數值存入Workday If Workday >= 1 And Workday <= 5 Then   '判斷是否為工作天     If Format(Time, "hh:mm:ss") >= "09:00:00" And Format(Time, "hh:mm:ss") <= "13:31:00" Then   '判斷是否為盤中         Call a  '執行程序a     Else         Application.OnTime TimeValue("00:09:00"), "ThisWorkBook.a"  '如果不是在盤中則等待明天九點開盤     End If End If End Sub Private Sub a() '宣告一個程序a    i = 2    '將i預設為2,因為資料是由第2行開始貼上    Call b   '執行程序b  End Sub  Private Sub b() '宣告一個程序b     Range("Stock200").Rows("2:201").Copy     'Copy範圍"Stock200"中的第2到第201列     工作表1.Cells(i, 1).PasteSpecial xlPasteValues '從工作
閱讀完整內容