R:从字符向量中提取最后几位数字

import re

def extract_last_digits_from_string(string, num_digits):
    # 将字符向量转换为字符串类型
    string = str(string)
    
    # 使用正则表达式匹配最后几位数字
    pattern = r'\d+$'
    match = re.search(pattern, string)
    
    if match:
        # 提取匹配到的数字结果
        last_digits = match.group()
        # 返回最后几位数字
        return last_digits[-num_digits:]
    else:
        return None

# 示例用法
string_vector = ["abc123", "def456", "xyz789"]
num_digits = 3

for string in string_vector:
    last_digits = extract_last_digits_from_string(string, num_digits)
    print(f"字符串 '{string}' 中的最后 {num_digits} 位数字为: {last_digits}")

字符串 'abc123' 中的最后 3 位数字为: 123
字符串 'def456' 中的最后 3 位数字为: 456
字符串 'xyz789' 中的最后 3 位数字为: 789