转换表

Question

我有一个包含61个变量的数据集。最后一列的名称为Weight。所以我的目的是按照最后一列的值复制每一行。例如，如果value为2，则代码需要将该行复制两次，如果value为3，则应复制3次，等等。您可以在下面看到数据集的小示例。

  #DATA
      TEST<-data.frame(
            Value =c(8634,5798,6022),
            Income =c(8834,5898,6033),
            Weight =c(2,3,1))

所以我的意图是要转换上面的表，就像下面的表。

那么有人可以帮助我如何转换此表吗？