R 识别或编码独特因素

我想创建一个新变量，litter，来表示不同产仔日期（fdate）的每头母猪或每窝母猪。如最后一列所示，每一窝的数量从1到N递增1

sow   season piglet fdate        litter
1M521    1    5702   14/09/2009    1
1M521    1    5703   14/09/2009    1
1M521    2    22920  17/02/2010    2
1M521    2    22920  17/02/2010    2
1M521    2    22920  17/02/2010    2
1M584    1    8516   28/09/2009    3
1M584    1    8516   28/09/2009    3
1M584    1    8516   28/09/2009    3
1N312    1    6192   16/09/2009    4
1N312    1    6193   16/09/2009    4
1N312    1    6194   16/09/2009    4
1N312    2    21818  11/02/2010    5
1N312    2    21819  11/02/2010    5
1N312    2    21820  11/02/2010    5
2A1526   1    9293   3/10/2009     6
2A1526   1    9294   3/10/2009     6
2A1526   1    9295   3/10/2009     6
2A1526   1    9296   3/10/2009     6

---

如果我理解正确的话，你只是基于fdate？如果您的数据帧是“小猪”，请尝试以下操作：

piglets$litter <- as.numeric(factor(piglets$fdate))

---

仔猪$litter我试图以母猪和母猪为基础。啊，因为你的样本数据没有两头母猪在同一天出生，所以错过了这一点。您可以按.numeric（factor（粘贴（pigheets$fdate，pigheets$sow，sep=“”）查看两者的组合。