R-如何从字符串中获取特定位置的单词？

def get_word_from_string(string, position):
    # 将字符串按照空格分割成单词列表
    words = string.split(" ")
    
    # 判断位置是否超出单词列表的范围
    if position < 0 or position >= len(words):
        return "位置超出范围"
    
    # 获取指定位置的单词
    word = words[position]
    
    return word

string = "Hello, how are you today?"
position = 2

result = get_word_from_string(string, position)
print(result)  # 输出：are