R/TimeSeries

차분 및 Box-Cox transformation 적용 사례

이부일 2019. 9. 18. 11:45

# 패키지 설치와 로딩하기
install.packages("forecast")
library(forecast)

 

 

# 그래픽 화면 분할하기 : 2행*2열
par(mfrow = c(2, 2))

 

 

# 왼쪽 위의 그림 : 원 데이터
plot(AirPassengers, main = "Air Passengers")

 

 

# 오른쪽 위의 그림 : 차분(difference)한 데이터
plot(diff(AirPassengers), main = "Difference : Air Passengers")

 

 

# Box-Cox transformation을 위한 lambda 구하기
lambda <- forecast::BoxCox.lambda(AirPassengers)
lambda

 

 

# Box-Cox transformation을 통한 새로운 데이터 만들기
AirPassengers_new <- forecast::BoxCox(AirPassengers, lambda)

 

 

# 왼쪽 아래 그림 : Box-Cox transformation한 데이터
plot(AirPassengers_new, main = "Box-Cox : Air Passengers")

 

 

# 오른쪽 아래 그림 : Box-Cox transformation and Difference
plot(diff(AirPassengers_new), main = "Difference & Box-Cox : Air Passengers")

 

 

[출처] R프로그램에 기반한 시계열 자료 분석, 이재길 지음, 황소걸음아카데미, p44