子集数据

Question

我有一个数据帧这样：

descriptionin = c("sample1","sample1","sample1","sample1","sample1","sample1","sample1","sample1","sample2","sample2","sample3","sample3","sample3","sample3","sample3","sample3") 
dilutionin = c(1,10,100,1000,1,10,100,1000,5,5,2,8,32,2,8,32) 
conditionin = c("cond1","cond1","cond1","cond1","cond2","cond2","cond2","cond2","cond1","cond2","cond1","cond1","cond1","cond2","cond2","cond2") 

testin <- data.frame(descriptionin,dilutionin,conditionin) 

，并想将数据帧到子集这样的：

descriptionout = c("sample1","sample1","sample1","sample1","sample1","sample1","sample1","sample1","sample3","sample3","sample3","sample3","sample3","sample3") 
dilutionout = c(1,10,100,1000,1,10,100,1000,2,8,32,2,8,32) 
conditionout = c("cond1","cond1","cond1","cond1","cond2","cond2","cond2","cond2","cond1","cond1","cond1","cond2","cond2","cond2") 

testout <- data.frame(descriptionout,dilutionout,conditionout) 

要解释，我会像通过具有多于一个数字（在这种情况下为1但实际数据集将是3）的稀释度的每个唯一描述/条件组合来对数据框进行子集分类。

感谢

Answer 1

一种选择是data.table。将'data.frame'转换为'data.table'（setDT(testin)），按'descriptionin'和'conditionin'分组，我们找到组中具有多于一个的稀释度的元素的行索引（.I）和使用该索引来排列子集

​​