powered by
Pc_givena
novelTest.extreme(xdata, ydata, maxi = length(xdata) - 1)
set.seed(10) xylist = generate.benchmark.data(7,.3,50) x = runif(50) novelTest.extreme(x,xylist$y,maxi=20) novelTest.extreme(xylist$x,xylist$y,maxi=20)
Run the code above in your browser using DataLab