新しいIDを割り振りたい

Question

下記のような2種類のIDが振られたデータセットを考えます。

id1 id2
1 11
1 12
2 12
2 13
3 14
3 15
4 15

これを下記のように「id1あるいはid2が同じなら、同じと見なして新しいID（newid）を振る」

id1 id2 newid
1 11 1
1 12 1
1 12 1
2 13 1
3 14 2
3 15 2
4 15 2

ことをRで行うにはどのようにしたらよいでしょうか？

既存のパッケージ、スクリプトなどご教示いただけると助かります。
よろしくお願いします。