Isolamento social e R: o que poderia dar errado?
Testei o pacote ARDL com dados de busca (abrangência mundial) pelos seguintes termos: Lamen, Gyoza, okonomiyaki e sunomono. O gráfico, ainda com alguns problemas no eixo (não tive tempo de ajustar as datas, mas o período é: 2004.01-2020.06), mas eis a cointegração.
Ah, sim, o código para obter a relação de cointegração – e outros detalhes – são uma mera adaptação do código original do exemplo do autor do pacote.
library(ARDL)
df<-read.table("C:/Users/cdshi/OneDrive/Documents/Meus Documentos/sunomono.csv",
header=TRUE, sep=",",na.strings="NA", dec=".", strip.white=TRUE)
models <- auto_ardl(Lamen~Gyoza+sunomono+okonomiyaki, data=df, max_order=4)
models$top_orders
models$best_model
ardl_1402<-models$best_model
summary(ardl_1402)
uecm_1402 <- uecm(ardl_1402)
summary(uecm_1402)
bounds_f_test(ardl_1402, case = 2)
tbounds <- bounds_t_test(uecm_1402, case = 3, alpha = 0.01)
tbounds
tbounds$tab
multipliers(ardl_1402)
ce <- coint_eq(ardl_1402, case = 2)
