没有数据结构，没有具体代码，不知道怎么帮你。给个链接参考一下吧。
https://bbs.pinggu.org/forum.php ... ;page=1#pid71320042

根据报错信息，看起来在计算comm_new数据框中"h"列的中位数时，出现了不兼容的结果类型。错误信息中提到，在"乌桕"组中，结果的类型是字符型(<character>)，而在"南酸枣"组中，结果的类型是数值型(<double>)。

这个问题通常发生在"h"列中包含了不同类型的数据。你可以检查一下"h"列的数据类型，确保所有的数据都是同一类型。你可以使用以下代码检查"h"列的数据类型：

class(comm_new$h)
如果发现"h"列中确实包含了不同类型的数据，你可以尝试将其转换为统一的数据类型，例如将字符型转换为数值型。你可以使用以下代码将"h"列转换为数值型：

comm_new$h <- as.numeric(comm_new$h)
如果转换成功，再次尝试计算中位数看看是否仍然出现错误。

另外，请确保在计算中位数之前，将数据框按照不同的"sp"值进行分组。你可以使用以下代码进行分组计算中位数：

library(dplyr)

comm_new %>%
  group_by(sp) %>%
  summarize(h_median = median(h, na.rm = TRUE))

仅供参考

谢谢！已经解决了

谢谢！按照类似的操作已经解决了问题！