Error in FUN(X[[i]], ...) : only defined on a data frame with all numeric-alike variables

这个错误提示是在使用R语言处理数据时遇到的，特别是当你尝试对一个不是全部由数值（numeric-like）变量构成的数据框（data frame）应用某种统计或数据操作函数时发生的。在R中，许多内置的函数和包如`dplyr`、`tidyr`等假定输入数据帧的每一列都应该是数值类型，以便于进行数学运算或聚合计算。

例如，如果你试图在一个包含非数字类型的列（如因子(factor)或字符串(strings))上运行`sum()`或`mean()`这样的函数，就会得到这个错误。解决这个问题的方法通常是：

1. **检查数据**：确认数据框的每一列是否都是数值类型。如果不是，你需要转换那些非数值列。

str(data_frame_name)  # 查看数据结构

2. **数据清洗**：对于非数值列，可以考虑转换成数值类型，例如使用`as.numeric()`或`as.factor() -> as.numeric()`。

data_frame_name[non_numeric_column] <- as.numeric(data_frame_name[non_numeric_column])

3. **筛选数据**：如果某些非数值列不需要参与计算，可以选择只处理数值列来进行操作。

numeric_data <- data_frame_name[, sapply(data_frame_name, is.numeric)]

4. **使用特定函数**：有些函数如`dplyr`中的`summarise_at()`或`mutate_if()`允许指定条件处理特定列。

df %>%
  summarise_all(~ mean(.), vars(where(is.numeric)))