r - 如何测试字符串中的前三个字符是r中的字母还是数字？

Question

下面给出了我的数据集示例，请注意，我在总数据集中有超过两列。

ID   X
1   MJF34
2   GA249D
3   DEW235R
4   4SDFR3
5   DAS3

我想测试 X 中的前三个字符是否是字母，如果是，那么我想替换该值以仅显示前三个字母。如果前三个字符不是字母，那么我想用“FR”替换这些值。因此结果如下。

ID    X
1    MJF
2    FR
3    DEW
4    FR
5    DAS

目前 X 是字符数据类型。

在此先感谢您的帮助。

Answer 1

我会尝试:

x <- substr(dt$X, 1, 3)
dt$X <- ifelse(grepl('[0-9]', x), 'FR', x)
dt
#   ID   X
# 1  1 MJF
# 2  2  FR
# 3  3 DEW
# 4  4  FR
# 5  5 DAS

数据:

structure(list(ID = 1:5, X = c("MJF34", "GA249D", "DEW235R", 
"4SDFR3", "DAS3")), .Names = c("ID", "X"), class = "data.frame", 
row.names = c(NA, 
-5L))