# .sampleData is special function for creating
# data for testing conditional denisty estimators
data = DepthProc:::.sampleData(1:5, 100)
x = data[,1]; y = data[,2]
plot(x,y)
dep = depthDensity(x,y)
plot(dep, type = "raw")
plot(dep, type = "depth")Run the code above in your browser using DataLab