inst/examples/minimal.R

p <- 20
n <- 10
C <- bandSparse(p,k=0:1,diagonals=list(rep(1,p),rep(-1,p-1)))
out <- bounded.reg(matrix(rnorm(20*10),10,20),rnorm(10), struct=t(C) %*% C, lambda2=1)
plot(out)

Try the quadrupen package in your browser

Any scripts or data that you put into this service are public.

quadrupen documentation built on Jan. 16, 2023, 5:08 p.m.