无法获得范围以在 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 中的默认范围。
刚开始学习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 中的默认范围。