更改和分组行ID

Question

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

             <a href="http://megabuy.vn/gian-hang/thiet-bi-van-phong" style="text-decoration:none;">
              <h2>
               THIẾT BỊ VĂN PHÒNG
              </h2>

我想为x1更改x1.i的所有ID，为x2更改x2.i，依此类推。所以我的数据框看起来像这样：

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

如果不使用循环，我怎么能这样做？

提前致谢并感谢您的回复！

Answer 1

我们可以使用sub将.后跟其他字符（.*）与字符串末尾相匹配，并将其替换为""

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