无法获得范围以在 tapply 函数中产生结果

Can not get range to produce a result in tapply function

刚开始学习R但是我无法在这个tapply中得到范围来产生结果function.I可以得到年龄和填充结果但不是如下所示的R。

ages <- c(25,26,37,56,42,25)

affill <- factor(c("U", "R", "R","D", "D", "U"))

tapply(ages, affill , range)

$D
[1] 42 56

$R
[1] 26 37

$U
[1] 25 25

你在找这样的东西吗?

ages <- c(25,26,37,56,42,25)

affill <- factor(c("U", "R", "R","D", "D", "U"))

my_range <- function(x, na.rm = TRUE) {
  max(x, na.rm = na.rm) - min(x, na.rm = na.rm)
}

tapply(ages, affill , my_range)
# D  R  U 
# 14 11  0

您可以构建自己的自定义函数来计算数值向量的范围,而不是返回 R 中的默认范围。