r - R：对几列应用 xts 函数

Question

我正在尝试将“dsa”功能应用于我的数据。问题是它仅适用于它的第一列，即使我将所有内容都设为 x。有什么方法可以应用于所有列吗？我的代码：

df <- read.csv("C:\\Users\\Weather.csv")
data <- within(df, rm(Date, ï..DATE))
#install.packages("dsa")

library(dsa)
library(xts)
daily_demand_timeserie <- xts(x = data,
                          order.by = df$Date,
                          frequency=365)
adjusted <- dsa(series = daily_demand_timeserie)

数据：

标签： rdataframeplot