Compute 2-Wasserstein distance between two Gaussian distributions
Gaussian_Wd(m1, m2, S1, S2, S = NULL)
distance value
mean of first distribution
mean of second distribution
variance of first distribution
variance of second distribution
(optional) matrix of pre-computed sqrtm(sqrtm(S1) %*% S2 %*% sqrtm(S1))