Invia SMS: Bayesovský odhad vektorovo autoregresných modelov v R