Сохраните результаты теста в новой переменной, векторе и т. Д.

Question

Я использую adf.test в своих данных для проверки стационарности.Я хочу сохранить значение теста в новой переменной, чтобы я мог использовать его для дальнейших процессов.

В основном я хочу сделать что-то вроде этого:

x <- adf.test(Timeseries_1)$pvalue

Но этоне работает!Любая помощь?

В продолжение вышесказанного я пытаюсь извлечь значение MAPE из проверки точности, но получаю следующую ошибку.

> etsfit <- ets(TS_1)
> accuracy(etsfit)

> if(accuracy(etsfit)$MAPE<10){
+ fcast <- forecast(etsfit)
+ plot(fcast)}else{print("Transformation needed")}

Error in accuracy(etsfit)$MAPE : $ operator is invalid for atomic vectors

> if(accuracy(etsfit)["MAPE"]<10){
+ fcast <- forecast(etsfit)
+ plot(fcast)}else{print("Transformation needed")}

Error in if (accuracy(etsfit)["MAPE"] < 10) {:missing value where TRUE/FALSE needed

Answer 1

разобрался с ответом.Думал, это будет полезно.

names(adf.test(Timeseries_1)) #to extract the pvalue of this test
if(adf.test(Timeseries_1)$p.value < 0.05){print("Time series is stationary")}