R 转换为xts不起作用，因为数据的类型为'；字符'；并且不能转换为'；数字'；

我有以下数据集

data
     date PX_LAST.USGG10YR Index PX_LAST.GSWISS10 Index
1  2012-12-31                 1.7574                  0.526
2  2013-01-31                 1.9849                  0.789
3  2013-02-28                 1.8756                  0.698
4  2013-03-29                 1.8486                  0.716
5  2013-04-30                 1.6717                  0.570
6  2013-05-31                 2.1282                  0.722
7  2013-06-28                 2.4857                  1.027
8  2013-07-31                 2.5762                  1.023
9  2013-08-30                 2.7839                  1.069
10 2013-09-30                 2.6100                  1.021

日期列的类是

> class(data[,1])
[1] "POSIXct" "POSIXt"

其他两列的类为

类别（数据[，2]） [1] “数字” 类别（数据[，3]） [1] “数字”

我现在正在将其转换为

df2=xts(data,order.by=data$date)

结果是

structure(c("2012-12-31", "2013-01-31", "2013-02-28", "2013-03-29", 
"2013-04-30", "2013-05-31", "2013-06-28", "2013-07-31", "2013-08-30", 
"2013-09-30", "1.7574", "1.9849", "1.8756", "1.8486", "1.6717", 
"2.1282", "2.4857", "2.5762", "2.7839", "2.61", "0.526", "0.789", 
"0.698", "0.716", "0.57", "0.722", "1.027", "1.023", "1.069", 
"1.021"), .Dim = c(10L, 3L), .Dimnames = list(NULL, c("date", 
"PX_LAST.USGG10YR Index", "PX_LAST.GSWISS10 Index")), index = structure(c(1356912000, 
1359590400, 1362009600, 1364515200, 1367280000, 1369958400, 1372377600, 
1375228800, 1377820800, 1380499200), tzone = "UTC", tclass = c("POSIXct", 
"POSIXt")), .indexCLASS = c("POSIXct", "POSIXt"), tclass = c("POSIXct", 
"POSIXt"), .indexTZ = "UTC", tzone = "UTC", class = c("xts", 
"zoo"))

看看结果，我明白了

> typeof(df2)
[1] "character"

显然，我不能将其用于计算（例如Return.calculate）。当我尝试将第2列和第3列转换为.numeric（df2[，2]）时，它仍然是“character”类型。有人能帮我找到一个代码，将其转换为正确的xts（即，第2列和第3列的类型为“double”），即df2的结构与本例类似

library(quantmod)
getSymbols('AAA',src='FRED')
class(AAA)
typeof(AAA)
> class(AAA)
[1] "xts" "zoo"
> typeof(AAA)
[1] "double

问候

---

Andreas

您在xts数据中包含了

date

列，因此R使用不会丢失任何信息（字符）的类型将data.frame转换为矩阵。不需要将

date

列作为xts索引和数据，因此在调用

xts（）

时只需省略该列即可

---

df2亲爱的Joshua，非常感谢您的解决方案。它工作得很好，我是一个快乐的露营者。向你问好，安德烈亚斯
df2 <- xts(data[,-1], order.by=data$date)