使用R语言删除冗余特征

以下是使用R语言删除冗余特征的方法：

1. 使用caret包的findCorrelation函数进行特征筛选：

library(caret)
# 创建一个数据框
data <- data.frame(
  var1 = c(1, 2, 3, 4, 5),
  var2 = c(2, 4, 6, 8, 10),
  var3 = c(3, 6, 9, 12, 15)
)

# 使用findCorrelation函数删除相关性大于0.8的特征
cor_matrix <- cor(data)
highly_correlated <- findCorrelation(cor_matrix, cutoff = 0.8)
filtered_data <- data[, -highly_correlated]

2. 使用dplyr包进行特征筛选：

library(dplyr)
# 创建一个数据框
data <- data.frame(
  var1 = c(1, 2, 3, 4, 5),
  var2 = c(2, 4, 6, 8, 10),
  var3 = c(3, 6, 9, 12, 15)
)

# 使用select函数选择不相关的特征
filtered_data <- data %>% select(-var2)