如何从时间序列中提取日期并将其转换为R

Question

我有一个由4个变量组成的数据集，即日期，黄金价格，原油价格和美元价格。我使用ts（）函数将数据类转换为时间序列。转换后，日期变为某个值。我可以使用as.Date（）函数从转换后的值中检索日期。现在我想在ts对象的日期变量中按日期替换日期值。

         #CONVERTING DATA FRAME TO TIME SERIES OBJECT.
          Gold.ts <- ts(Gold,start=Gold$DATE[1])
          head(Gold.ts)


         #OUTPUT.

        DATE GOLD.PRICE CRUDE DOLLAR.INR
  [1,] 13152      533.9 63.42     44.705
  [2,] 13153      526.3 62.79     44.600
  [3,] 13154      539.7 64.21     44.320

 head(as.Date(index(Gold.ts)))
 [1] "2006-01-04" "2006-01-05" "2006-01-06" "2006-01-07" "2006-01-08" "2006-  01-09"
 Gold.ts$DATE <- as.Date(index(Gold.ts)) # This won't work because $ is not   acceptable to extract variables from a time series object.
 index(Gold.ts) <- as.Date(index(Gold.ts)) #This should work but gives error. How to display date instead of values in time series object i.e Gold.ts?  

这样做的正确方法是什么？