## Not run:
# x=matrix(rnorm(100*20),100,20)
# beta=c(rep(2,5),rep(0,15))
# y=x%*%beta+rnorm(100)
#
# # mht
# mod=mht(x,y,alpha=c(0.1,0.05),maxordre=15)
# plot(mod)
#
# # mht.order
# mod.order=mht.order(x,y,ordre=5:1,alpha=c(0.1,0.05))
# plot(mod.order)
# ## End(Not run)
Run the code above in your browser using DataLab