развернуть таблицу частот в r

Question

Привет всем Я борюсь с чем-то, что, по-моему, должно быть легко.

У меня есть набор данных, который выглядит следующим образом

Var1 Var2 Var3 Var4 Count 
a b c  d 10 
z a c  f 3 

Я просто нужна функция, которая повторяет строки, основанные на подсчете. Поэтому я бы получил новый фрейм данных или таблицу данных, в которой было бы 13 строк.

Для этого я пытаюсь использовать функцию rep(), но она не работает.

dat <- read.table(text="Var1 Var2 Var3 Var4 Count 
a b c  d 10 
z a c  f 3", header=TRUE) 

Answer 1

Что-то, как это стандарт:

dat[rep(1:nrow(dat), dat[["Count"]]), ] 

##  Var1 Var2 Var3 Var4 Count 
## 1  a b c d 10 
## 1.1 a b c d 10 
## 1.2 a b c d 10 
## 1.3 a b c d 10 
## 1.4 a b c d 10 
## 1.5 a b c d 10 
## 1.6 a b c d 10 
## 1.7 a b c d 10 
## 1.8 a b c d 10 
## 1.9 a b c d 10 
## 2  z a c f  3 
## 2.1 z a c f  3 
## 2.2 z a c f  3