powered by
cwrEm
stepCwr(X, Y, nc, prop = 0.1, nIter = 10, changeTrainingSet = FALSE)
data(geyser) x=geyser[,1] y=geyser[,2] ciao=stepCwr(x,y,nc=2)
Run the code above in your browser using DataLab