R/Rfunc.R

Defines functions .Rfunc

.Rfunc <- function(alpha1,alpha2,L){
  t(alpha1)%*%solve(diag(L))%*%alpha2
}
solvsa/simrel documentation built on May 30, 2019, 6:27 a.m.