获取列表的次要元素

Question

如何获取列表的次要元素和次要元素？是否有一些功能呢？

示例：

a <- c(3,2,1)
minor(a)
1
sminor(a)
2

Answer 1

最低价值？

> min(a)
[1] 1

亚军：

> min(a[a!=min(a)])
[1] 2

Answer 2

如何使用sort？

# slightly less confusing test values
x <- c(2,7,5)

# get the second smallest value
sort(x)[2]
[1] 5

或者要获取第二个最小数字而不是值的索引，请使用order：

order(x)[2]
[1] 3

...您可以使用

返回值

x[order(x)[2]]
[1] 5

Answer 3

如果您想要稍微不同的行为（如果是重复值）：

min(a)

min(a[-which.min(a)])