r - 相関、read.table()、数値?

Question

関数でデータファイルを読みましたread.table。しかし今、2 つの列が相関しているかどうかを確認したいと思います。そのため、関数を使用しましたcorが、機能しません。相関関係を含むステートメントが必要なifので、これを試しました：

toRemove2 <- c()

for (i in 3002:6986) {

for (k in i+1:6986){

   if(cor(data[,i] , data[,k])>.95){

      toRemove2 <- append(toRemove2, names(data)[k])  

 }
 }

}

これは私が得るエラーです。

Error in cor(data[, i], data[, k]): 
  'y' must be numeric

を使用するfor (k in i:6986)と、エラーは発生しません。私のファイルではsum(data[,i])、すでに を使用していたので、数値でなければならないというエラーは発生しませんでした。

誰かが私を助けることができますか？