我运行的lars也有同样的问题，
x<-read.csv("x.csv")
> y<-read.csv("y.csv")
> X<-as.matrix(x)
> Y<-as.matrix(y)
> local({pkg <- select.list(sort(.packages(all.available = TRUE)),graphics=TRUE)
+ if(nchar(pkg)) library(pkg, character.only=TRUE)})
lars(X,Y)
错误于if (any(nosignal)) { : 需要TRUE/FALSE值的地方不可以用缺少值
