如何将重叠范围转换为连续范围？

Question

我有像这样的重叠范围

数据

G S E
o 10 15
o 13 20
r 20 28
r 25 33

我正在尝试将其转换为如下所示的表格。

G S E
o 10 12
o 13 19
r 20 24
r 25 33

我一直在尝试使用ifelse条件和data.table shift来访问下一行的值进行比较，但尚未成功。任何建议将不胜感激。