将行乘以条目

Question

在R i中有一个矩阵，它有几个分类值。索引尺寸2平方米，4平方米，6平方米，1-3个单位数，1-4个人数，然后是一个具有所有出现次数的汇总计数的列。

例如：

Size;Units;Pers;Count
4;3;4;3 # three time this row
2;1;1;2 # two times this row
6;2;2;1 # one times this row

如何将最后一列/向量多行化为行，以便打印出来：

Size;Units;Pers;Count
4;3;4;1
4;3;4;1
4;3;4;1
2;1;1;1
2;1;1;1
6;2;2;1

在电子表格或R中 这是一个学校的作业，我找不到制作最后一个向量的方法（我用它作为一个常数来乘以前3列，但仍然保留一个在最后一列中。

Answer 1

我们可以通过“计数”列和transform复制行序列，以创建1的“计数”列。

transform(df1[rep(1:nrow(df1), df1$Count),-4], Count=1)

这也可以通过expandRows

中的包装函数library(splitstackshape)来完成

library(splitstackshape)
transform(expandRows(df1, 'Count'), Count=1)