R 更改和分组行ID

我有一个包含这些列的数据框

ID     X    Y  
x1.1  0.1  0.2  
x1.2  0.1  0.2  
x1.3  0.1  0.2  
x2.1  0.3  0.4  
x2.2  0.3  0.4  
x3.1  0.5  0.6  
x3.2  0.5  0.6  
...   0.1  0.2

我想更改x1.I的所有ID，x2.I的所有ID，等等。因此，我的数据框架如下所示：

ID     X    Y   
x1    0.1  0.2  
x1    0.1  0.2  
x1    0.1  0.2  
x2    0.3  0.4  
x2    0.3  0.4  
x3    0.5  0.6  
x3    0.5  0.6  
...   ...  ...

如果不使用循环，我怎么做呢

---

问候并感谢您提前回复

我们可以使用

sub

将

后跟其他字符（

*

）匹配到字符串末尾，并将其替换为

“

df1$ID
df1$ID <- sub("\\..*", "", df1$ID)
df1
#  ID   X   Y
#1 x1 0.1 0.2
#2 x1 0.1 0.2
#3 x1 0.1 0.2
#4 x2 0.3 0.4
#5 x2 0.3 0.4
#6 x3 0.5 0.6
#7 x3 0.5 0.6