从R中的数据框中删除所有字符串？

# 创建一个示例数据框
df <- data.frame(a = c(1, 2, 3), b = c("abc", "def", "ghi"), c = c("xyz", "123", "456"))

# 使用subset()函数删除所有字符串
df <- subset(df, select = sapply(df, is.numeric))

library(dplyr)

# 创建一个示例数据框
df <- data.frame(a = c(1, 2, 3), b = c("abc", "def", "ghi"), c = c("xyz", "123", "456"))

# 使用dplyr包中的select_if()函数删除所有字符串
df <- df %>% select_if(is.numeric)

# 创建一个示例数据框
df <- data.frame(a = c(1, 2, 3), b = c("abc", "def", "ghi"), c = c("xyz", "123", "456"))

# 使用apply()函数删除所有字符串
df <- df[, sapply(df, is.numeric)]