如何对R中的数字列运行相关性分析

Question

我需要对某些列不是数字的数据帧运行相关性分析。如果可能的话，我想从分析中删除非数字列，而不需要手动执行。我试过了，但没有检索到任何结果：

library(ISLR)
library(corrplot)
head(Carseats)
X<-cor(Carseats[apply(Carseats, function(x) !is.factor(x))])
corrplot(X)

我得到以下错误：

match.fun（fun）中出错：缺少参数"fun"，没有默认

我见过一些使用is.numeric的代码，但结果是一样的。

Answer 1

这应该非常接近：

myColumns <- sapply(Carseats, function(x) !is.factor(x))
X<-cor(Carseats[, myColumns])