powered by
emp.quantile(arg, dendat)
emp.distribu
set.seed(2) n<-100 d<-2 x<-matrix(runif(n*d),n,d) arg<-c(0.5,0.5) emp.quantile(arg,x)
Run the code above in your browser using DataLab