下面是一个示例数据集：

sample1 <- data.frame(Names=letters[1:10], Values=sample(seq(0.1,1,0.1)))

当我对数据集重新排序时，我会丢失行名称的顺序

sample1[order(sample1$Values), ]
    Names Values
 7      g    0.1
 4      d    0.2
 3      c    0.3
 9      i    0.4
10      j    0.5
 5      e    0.6
 8      h    0.7
 6      f    0.8
 1      a    0.9
 2      b    1.0

所需输出：

Names Values
 1      g    0.1
 2      d    0.2
 3      c    0.3
 4      i    0.4
 5      j    0.5
 6      e    0.6
 7      h    0.7
 8      f    0.8
 9      a    0.9
10      b    1.0