r - R の cv.lars のエラー

Question

cv.larsについて質問があります。以下は、私が使用するデータの説明です。

is.numeric(Y$Y1)
[1] TRUE

length(Y$Y1)
[1] 589


dim(Training_XX[7:ncol(Training_XX)])
[1]  589 5677

larsパッケージを使用して既に投げ縄を実行しています。私のコードは次のとおりです。

LASSO_1<-lars(as.matrix(X[7:ncol(X)]), 
              Y$Y1,type=c("lasso"), 
              normalize=TRUE, use.Gram=FALSE).

上記の手順はうまくいくようです。ただし、ラムダ値を相互検証しようとすると、次のエラーが発生します。

Error in if (zmin < gamhat) { : missing value where TRUE/FALSE needed

相互検証の私のコードは次のとおりです。

CV<-cv.lars(as.matrix(X[7:ncol(X)]),Y$Y1,use.Gram=FALSE,max.steps=500)
lambda_Y1=CV$index[which.min(CV$cv)]

何が起こっているのか誰にも分かりませんか？そのエラーが何を意味するのか、データ (またはコード) の何が問題なのか、本当にわかりません。