# NOT RUN {
x <- cbind(intercept=100,data.matrix(iris[1:2]))
y <- iris[[3]]
w <- nrbm(lmsRegressionLoss(x,y))
w <- nrbm(ladRegressionLoss(x,y))
w <- nrbm(quantileRegressionLoss(x,y,q=0.5))
w <- nrbm(epsilonInsensitiveRegressionLoss(x,y,epsilon=1))
# }
Run the code above in your browser using DataLab