我写了一段程序如下：
penalty<-adaptive.lasso(lambda=l,as.weights=w)
lqa(y=y,x=X,penalty=penalty,weights=w,intercept=F)
不知道这样对不对，是可以算出来值的，可是算出来的coefficients的后面几项为什么不能强制为0呢？