r - 将data.frame转换为Zoo

Question

我想将data.frame转换为Zoo对象。我的df看起来像这样:

> (str(StockPriceReturns))
'data.frame':   3036 obs. of  2 variables:
 $ Date        : Factor w/ 3036 levels "01.01.2002","01.01.2003",..: 1 102 202 301 600 701 802 902 1001 1300 ...
 $ TotalReturns: num  183 183 186 191 191 ...
NULL

我试过的

直接地:

在这里我得到一个错误...

> (z1 <- read.zoo(StockPriceReturns, drop=FALSE))
Error in read.zoo(StockPriceReturns, drop = FALSE) : 
  index has 3036 bad entries at data rows: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 ...

功能:

我也有一个错误;(

    dfToZoo <- function(df) {
        require(zoo)
        date <- as.Date(df[, 1], format = '%d.%m.%y')
        with(df, zoo(date,freq))
    } 

> (z1 <- dfToZoo(StockPriceReturns))
Error in MATCH(order.by, order.by) : object 'freq' not found

我的问题是将 data.frame转换为Zoo对象的更好方法是什么？如何正确地做到这一点？

感谢您的回覆

Answer 1

关于尝试使用read.zoo，必须指定第一列的格式，因为它与默认格式不同。有关该功能的正确用法，请参见?read.zoo。另外，还有一个专门用于vignette("zoo-read")示例的小插图read.zoo。

DF <- data.frame(Date = c("01.01.2002","01.01.2003"), TotalReturns = c(183, 183))
library(zoo)
read.zoo(DF, format = "%d.%m.%Y")
## 2002-01-01 2003-01-01 
##        183        183 

问题中提供的 dfToZoo函数未正确使用 zoo(请参阅 ?zoo以了解参数)，并且 format参数的值应为 "%d.%m.%Y"，且大写字母Y。