提取以740开头的ID并截取其前13位数字的技术问询

步骤说明 #

1. 将ID转为字符型：避免大数值被R自动转为科学计数格式，确保截取操作的准确性。
2. 筛选目标ID：用正则表达式匹配所有以740开头的ID。
3. 截取前13位：提取每个符合条件的ID的前13个字符。

代码实现 #

# 定义字符型ID向量（规避科学计数问题）
id <- c(
  "7401988456123452",
  "7401955456218",
  "740202045655545",
  "7401938152000",
  "740198845612314554"
)

# 筛选以740开头的ID并截取前13位
target_ids <- substr(id[grepl("^740", id)], 1, 13)

# 查看结果
target_ids

运行结果 #

[1] "7401988456123" "7401955456218" "7402020456555" "7401938152000" "7401988456123"

内容的提问来源于stack exchange，提问作者Abdulsalam Elnaeem