r - 如何从汇总数据到原始数据

Question

我首先想使用 r 生成多项分布的数据，然后我想要数据的“原始”形式。举个例子，假设我通过以下方式生成数据

 set.seed(1)
 df <- as.data.frame(cbind(rmultinom(1, 13, c(0.1, 0.3, 0.4, 0.2)), seq(from = 0, to = 3, by = 1)))

我明白了

  V1 V2
  3  0
  2  1
  4  2
  4  3

然后我想要一个向量中的数据在个人级别，所以它看起来像

0, 0, 0, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3

是否有捷径可寻？我是新手，这并不像我想象的那么容易。我试图创建一个看起来像的函数

xcv <- vector(length = m)


asdf <- function(x, n){
 for(i in 1:n){
   xcv[j] <-  seq(from = x[i,2], to = x[i,2], length.out = x[i,1])  

 }
return(xcv)
}

这根本不起作用，所以我希望得到一些帮助。