Может ли кто-нибудь поделиться кодом r для модели var-bekk?

Question

Я хотел бы оценить временной ряд с четырьмя переменными, используя модель var-bekk. Может ли кто-нибудь помочь с кодом r для модели var-bekk?