[問題] For迴圈整理存入新的矩陣

看板R_Language作者Caecilius (下好離手)時間8年前 (2017/01/18 14:33)推噓2(2推 0噓 1→)

留言3則, 1人參與討論串1/1

[問題類型]: 程式諮詢(我想用R 做某件事情，但是我不知道要怎麼用R 寫出來) [軟體熟悉度]: 新手(沒寫過程式，R 是我的第一次) [問題敘述]: 範例如下，我是在網路上抓到海龜的策略，然後因為yahoo資料每天晚上只有隔天的資料所以希望能每天早上能更新今天的各值，令其存入新的矩陣Sign。如 "1513.TW" "2014.TW" "2344.TW" x$Min20 ... ... ... x$Max20 ... x$Min10 ... x$Max10 x$Min55 x$Max55 N 結果只知道怎麼存一維的資料，要塞其他東西都卡住，麻煩各位大大了。 [程式範例]: library(quantmod) library(PerformanceAnalytics) #.TW/.TWO symbols <- c("1513.TW","2014.TW","2344.TW") initDate="2016-01-01" getSymbols(symbols, from = initDate) Sign <- NULL for(symbol in symbols){ x=get(symbol) x$Min20 <- runMin(x[,grep('Low',colnames(x))], 20) x$Max20 <- runMax(x[,grep('High',colnames(x))],20) x$Min10 <- runMin(x[,grep('Low',colnames(x))], 10) x$Max10 <- runMax(x[,grep('High',colnames(x))],10) x$Min55 <- runMin(x[,grep('Low',colnames(x))], 55) x$Max55 <- runMax(x[,grep('High',colnames(x))],55) x$N <- ATR(x[,c(2,3,4)], n=20, maType=EMA, wilder=TRUE)[,'atr'] assign(symbol,x) #for (i in symbols){ # Sign[i] <- tail(x$Min20,1) #} 這也只有跑出第一筆的Min20.... } [環境敘述]: R version 3.3.2 (2016-10-31) Platform: x86_64-w64-mingw32/x64 (64-bit) Running under: Windows 7 x64 (build 7601) Service Pack 1 [關鍵字]: for 迴圈 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 112.105.245.30 ※ 文章網址: https://www.ptt.cc/bbs/R_Language/M.1484721209.A.4B8.html