##Minimizing Poisson log-liklihood
set.seed(12345)
yp <- rpois(9,5)
Atot <- cbind(1:8, 2:9) ##Matrix defining isotonicity (total order)
x0 <- 1:9 ##starting values
fit.poi <- activeSet(Atot, sSolver, x0 = x0, y = yp)
Run the code above in your browser using DataLab