xts

0熱度

1回答

我是從DataCamp我的筆記本電腦複製代碼： library(xts) plot.zoo(flights_xts, plot.type = "multiple", ylab = labels) plot.zoo(flights_xts, plot.type = "single", lty = lty) legend("right", lty = lty, legend = labels)

0熱度

1回答

在xts中添加元素

我正在將腳本轉換爲使用xts而不是數據框，但在跨不同的行/列中的元素進行計算時遇到困難。實際上，我使用for循環遍歷df行，並使用基於計算的if-elses。但是，爲了簡化問題，我可以補充說柱A排1色柱B第2行就好在DF，但不是在XTS ....這裏的一些示例代碼： > df <- data.frame(c(1:3),c(4:6)) > names(df) <- c('colA','colB

3熱度

2回答

保留時間戳記中的R

分解XTS後我有一個xts時間序列稱爲R中hourplot用一段24（每小時的數據）兩個多星期，通過POSIXlt類的時間戳對象索引，如下所示： > dput(hourplot) structure(c(1, 1, 1, 1, 1, 1, 1.11221374045802, 1.3368, 1.18, 1.0032, 1, 1, 1, 1, 1, 1, 1.0736, 1.2536,

0熱度

1回答

在Shiny應用中過濾xts對象

我想在我的Rmarkdown中顯示一個在網絡間切換的基本Shiny dygraph。下面是數據的一個樣本： > head(df) nightTrips dayTrips network 2014-05-03 0 16 1 2014-05-04 0 5 1 2014-05-05 0 8 1 2014-05-06 0 3 1 2014-05-07

1熱度

2回答

如何使用日期對象對xts文件進行子集？

我在這個問題上搜索了很長時間，但找不到答案。我們面臨的挑戰是找到一種方式，通過日期的形式子集的XTS文件： dat <- xts(1:10, as.Date("2000-01-01")+1:10) date.1 <-as.Date("2000-01-05") dat.subset <-dat[date.1/] 這不工作，當然，也一樣的變化，如： dat.subset <-dat["date

1熱度

1回答

擴展xts對象的索引

我想創建一個xts對象與其他xts對象的索引，但增強，即更長：在開始之前和結束之前。例如對於相應的索引後，加入5段，我將使用： data(sample_matrix) xts_object <- as.xts(sample_matrix, descr='my new xts object') add_right <- 5 seq(as.Date(end(xts_object)), by

3熱度

1回答

日期子集xts文件

我是R編碼新手，發現自己被卡住了。我的文件由高頻股票指數數據組成，並被轉換爲xts文件。見下文（左列的日期和時間，右列盤中返程）： 2007-01-02 09:00:00 0.000000e+00 2007-01-02 09:01:00 2.670405e-05 2007-01-02 09:02:00 1.387629e-03 2007-01-02 09:03:00 -1.86684

1熱度

2回答

將因素類的yyyymm轉換爲與ChartSeries一起使用的字符類（）

我使用read.csv()命令讀取了一個CSV文件，我想用chartSeries()將其轉換爲xt和圖形。我變成一個矩陣做： MyData <- as.matrix(MyData) 當我轉換使用到XTS MyData_xts <- xts(MyData[,-1], order.by=as.POSIXct(MyData[,1])) 我收到以下錯誤信息： Error in as.POSIXl

2熱度

1回答

R：轉換TS對象XTS當語言的變化對象

我嘗試內置的時間序列sunspots數據轉換爲XTS對象，並用下面的代碼打印出來： sunspots.xts <- as.xts(sunspots) sunspots.xts 結果看起來像這 enter image description here 這裏是我的sessionInfo()輸出： R version 3.3.2 (2016-10-31) Platform: x86_64-w64

0熱度

1回答

xts對象在子集化時丟失xts類

請考慮以下事項。 junk1.xts <- xts(c(0:10), as.yearqtr("1975 Q1") + 0.25*(0:10)) junk2.xts <- xts(c(30:0), as.yearqtr("1970 Q1") + 0.25*(0:30)) junk2a.xts <- junk2.xts[index(junk1.xts),] class(junk1.xts) c