从 data.frame 开始...
df = data.frame(k=c(1,5,4,7,6), v=c(3,1,4,1,5))
> df
k v
1 1 3
2 5 1
3 4 4
4 7 1
5 6 5
我可能会进行一些任意操作...
> foo1 = df[df$k>3,]
> foo2 = head(foo1[order(foo1$v),], 2)
> foo2
k v
2 5 1
4 7 1
此时foo2已以某种方式保留了原始行号df（在本例中为 2 和 4）。
我如何提取这些？
> insert_magic_function_here(foo2)
[1] 2 4