powered by
wasserMetric.v(cases, control, paranum = 101, q = 2)
cases <- rbeta(30,1,5) control <- rbeta(30,2,5) wasserMetric.v(cases,control)
Run the code above in your browser using DataLab