R 使用任何应用方法找出每个学生的最大和最小分数之间的差异

R 使用任何应用方法找出每个学生的最大和最小分数之间的差异,r,lapply,R,Lapply,这是分数表 Scores<-list(T = c(10,8,7,9), M = c(9,10,8,7), L = c(6,8,10), B = c(10,9,10,7,8)) Scores如果您刚刚开始,这会更加困难,因为您可能希望将所谓的匿名函数传递给lappy(),而不是像mean这样现成的函数。以下是如何做到这一点: Scores <- list(T = c(10,8,7,9), M = c(9,10,8,7), L = c(6,8,10), B = c(10,9,10,7,

这是分数表

Scores<-list(T = c(10,8,7,9), M = c(9,10,8,7), L = c(6,8,10), B = c(10,9,10,7,8))

Scores如果您刚刚开始,这会更加困难,因为您可能希望将所谓的匿名函数传递给
lappy()
,而不是像
mean
这样现成的函数。以下是如何做到这一点:

Scores <- list(T = c(10,8,7,9), M = c(9,10,8,7), L = c(6,8,10), B = c(10,9,10,7,8))

lapply(Scores, function(x) diff(range(x)))

# $T
# [1] 3
#
# $M
# [1] 3
#
# $L
# [1] 4
#
# $B
# [1] 3

评分以后可能更容易阅读的类似方法是
lappy(评分,函数(x)max(x)-min(x))
。在这个非常小的数据集上,使用
max(x)-min(x)
方式更有效。