R/PR.IARM.R

Defines functions PR.IARM

Documented in PR.IARM

PR.IARM <-
function(x,y,p,Rmat=diag(k*p),rvec=matrix(0,nrow=k*p)){
x=as.matrix(x); k = ncol(x)
if (k == 1) M = PR2(x,y,p,Rmat,rvec);
if (k > 1) M = PR3(x,y,p,Rmat,rvec);
return(M)}

Try the VAR.etp package in your browser

Any scripts or data that you put into this service are public.

VAR.etp documentation built on July 2, 2022, 1:05 a.m.