# NOT RUN {
tmp <- matrix(runif(100),20,5)
S <- crossprod(tmp) #some synthetic covariance matrix
P <- solve(S)
m <- runif(5)
x2 <- runif(3)
inferenceJointGaussian(x2 = x2,mu = m,Precision = P)
# }
Run the code above in your browser using DataLab