我有一个返回列表:
测试<-列表(Test A
=5421.815,Test B
=5032.269,Test n
=6602.334(
名称 | 类型 | 值 |
---|---|---|
测试 | 双1 | 长度列表7 |
测试n |
使用which.min
获得min
最小值的索引,然后用该索引对list
进行子集设置
test[which.min(test)]
#$`Test B`
#[1] 5032.269
test[Reduce(min, test) == test]
#$`Test B`
#[1] 5032.269
或
test[min(unlist(test)) == test]
#$`Test B`
#[1] 5032.269