将csv库存数据转换为xts时出错

Question

下面是我尝试将csv文件转换为xts的代码，以便我可以对其执行分析，但似乎没有任何工作。我甚至使用过这个平台上发布的类似问题的答案，但似乎没有任何效果。

toDate <- function(x) as.Date(x, origin = "2015-02-15")
z <- read.zoo("Nasdaq.csv", header = TRUE, sep = ",", FUN = toDate)
x <- as.xts(z)

我得到以下错误：

7. stop("character string is not in a standard unambiguous format") 
6. charToDate(x) 
5. as.Date.character(x, origin = "2015-02-15") 
4. as.Date(x, origin = "2015-02-15") 
3. FUN(...) 
2. processFUN(ix) 
1. read.zoo("Nasdaq.csv", header = TRUE, sep = ",", FUN = toDate) 

Answer 1

问题是当您将文件作为动物园阅读时。 如果是时间序列，请尝试加载文件，而不是将其转换为ts。

data <-  read.csv("anyfile.csv")
Y <- ts(data$Y, start = c(2015, 2), end = c(2017, 1), frequency = 12)
my_xts <- as.xts(Y)