提问人:Damien Bau 提问时间:11/16/2023 最后编辑:PhilDamien Bau 更新时间:11/16/2023 访问量:9
为什么当我颠倒数据顺序时,R seasonal 包中的 seas() 函数返回错误?
Why does my seas() function from the R seasonal package return an error when I reverse the order of my data?
问:
我正在尝试从 R 上的季节性包运行季节性调整函数 seas()。我的代码如下:
#import and load required packages
#install.packages("seasonal")
#install.packages("tidyverse")
#install.packages("parsedate")
library(seasonal)
library(tidyverse)
library(parsedate)
# import datarange from excel
#data <- AirPassengers #temp
data <- read.csv('C:/Users/user/Desktop/x13arima/temp.csv')
# clean imported data and standardise date format
data[[1]] <- parse_date(data[[1]])
data[[1]] <- format(data[[1]],"%Y-%m")
# reverse order of data to descending
data <- map_df(data,rev)
data <- data.frame(data)
data[,2] <- as.numeric(data[,2])
#specify the start date of time series
start_date = str_split_1(data[1,1],"-")
#convert data to time series
series <- ts(data[[2]],frequency = 12, start = start_date)
# perform seasonality adjustment on cleaned data
adjusted = seas(series)
# select subset to export from analysed data
export = adjusted[["data"]]
#export = subset(export,select = c("final","seasonal"))
# export dataframe
write.csv(export,file="C:/Users/user/Desktop/x13arima/adjusted_data.csv", row.names=FALSE)
当我在没有行的情况下运行脚本时,这没有问题
# reverse order of data to descending
data <- map_df(data,rev)
data <- data.frame(data)
data[,2] <- as.numeric(data[,2])
我颠倒了数据框的顺序,并确保新数据框的格式与以前相同。当我使用此代码块运行脚本时,出现错误:
Error in file(con, "r") : cannot open the connection
In addition: Warning message:
In file(con, "r") :
cannot open file 'C:\Users\user\AppData\Local\Temp\RtmpcVfiCB\x1375d824d446cd/iofile.est': No such file or directory
我的数据采用以下格式:
从 2018 年 11 月 30 日到 2023 年 10 月 31 日不等。
我在网上找不到任何与此相关的内容,也不确定如何解决这个问题。以前有人遇到过类似的问题吗?
我尝试了几种反转数据框中行的方法,并且还确保新数据框的格式与旧数据框完全相同。时间序列“series”的格式也与以前相同,绘制此格式可得出预期的结果。
答: 暂无答案
上一个:加法的时间复杂度
下一个:使用多列策略反转键索引
评论