Strsplit数据与部分标题

Question

我知道这已经被问到了，但这对我不起作用。我正在尝试拆分从FRED拉出的数据列。

这是$ DGS1的数据。你看到它检索日期和产量到一列，但我需要将它分开，所以我用" "尝试了它，但是没有用。它给出了错误Error in strsplit(data$DGS1, " ") : non-character argument

           DGS1 1993-10-01 3.35 1993-10-04 3.35 1993-10-05 3.38 1993-10-06 3.36 1993-10-07 3.35

这是我的代码：

symbols=c("DGS1","DGS2","DGS3","DGS5","DGS7","DGS10","DGS20")
getSymbols(symbols,src='FRED')
data <- na.omit(merge(DGS1,DGS2,DGS3,DGS5,DGS7,DGS10,DGS20))
data <- strsplit(as.character(data$DGS1), " ")
print (head(data$DGS1, n=5))

当我将其作为data<- strsplit(as.character(all$DGS1), " ")时，它会返回null。如何拆分列以便我可以获取日期和费率？