xts

    1熱度

    1回答

    在Windows下面的子查詢代碼產生了不正確的XTS對象,但正常的工作我的Ubuntu機器上 library(xts) theTimes <- seq(from=as.POSIXct('2016-03-10 12:00:00 CDT'), to=as.POSIXct('2016-03-20 12:10:00 CDT'),by=60) ExampleData <- xts(re

    1熱度

    1回答

    我認爲端點是通過將索引轉換爲UTC生成的。我希望在每個小時9:00/10:00等(或以我特定的時間間隔,比如9:30/10:30等)改變端點。 在下面的示例對象「a」爲UTC和端點在4創建的:55,5:55等,對於對象「B」其在10:25,11:25等我尋找一個解決方案以特定方式提供端點,而不考慮時區。 有沒有簡單的機制可以做到這一點? > head(a) Open High

    1熱度

    1回答

    到矩陣 所以我有一個XTS看起來像這樣的時候: EUR.CLOSE EUR.CLOSE.1 EMA RUB.CLOSE RUB.CLOSE.1 EMA.1 COP.CLOSE COP.CLOSE.1 EMA.2 MXN.CLOSE 2016-08-30 -0.7176776 0.1507033 42.50321 0.6565255 0.1969145 52.73467 0.4499486

    0熱度

    1回答

    我有一個csv文件中的符號列表,我想篩選收盤價高於5的那些。 我已經爲csv文件中的所有項目運行getSymbols。 我的測試在這裏出錯。我認爲這是因爲Cl()不接受字符作爲參數。我如何將字符轉換爲xts? > library(quantmod) > passingset V1 1 AAB 2 AAR-UN 3 AAV 4 ABT 5 ABX (..

    0熱度

    1回答

    利用發佈在論壇上的資源,我設法創建了一個腳本,將文件轉換爲xts類的對象。但是,這是這些對象的列表。最終,我想將這些文件轉換爲單獨的對象xts。我必須在腳本中輸入一個更改,它們作爲單獨的對象出現,每個對象都是xts類? 有腳本: files <- list.files(pattern="*.mst") listmst <- vector("list", length(files)) names

    0熱度

    4回答

    我有以下數據 library(xts) values<-c(2,2,2,4,2,3,0,0,0,0,0,1,2,3,2) time1<-seq(from=as.POSIXct("2013-01-01 00:00"),to=as.POSIXct("2013-01-1 14:00"),by="hour") data<-xts(values,order.by=time1) data

    1熱度

    1回答

    我的數據間隔爲0.1秒或10行一秒 因此,基於24 * 60 * 60 * 10的864000行一天。 我想在我的數據中找到列(風速和其他變量不顯示在這裏)的意思,將它從0.1秒時間步聚合到半小時。因此,數據將從864000行彙總到48線(一天) 輸入: tms Hr Min Sec Wind speed 7/13/2014 0:00 0 0 0 3.45 7/13/2014 0:00 0

    3熱度

    3回答

    學習R,不知道如何解決這個問題。 library(quantmod) library(xts) # get market data Nasdaq100_Symbols <- c("AAPL", "AAL") getSymbols(Nasdaq100_Symbols) # merge them together nasdaq100 <- data.frame(as.xts(merge

    1熱度

    2回答

    我在.rData文件中給出了一些數據。格式是字符模式下的xts對象。 (I意識到這是一個不尋常的格式,但我有在它沒有控制) > head(trades) SYMBOL EX PRICE SIZE COND BID BIDSIZ OFR 2012-05-04 09:30:00 "BAC" "T" "7.89" "38538" "F" "7.89" "523" "7.9" 201

    2熱度

    1回答

    我與一些數據樣本XTS對象: dates <- seq.Date(from = as.Date("2010-01-01", format = "%Y-%m-%d"), to = as.Date("2013-12-01", format = "%Y-%m-%d"), by = "month") sample_data <- cbind(1:length(dates),length(dates)