R:从向量路径生成多级列表？

def generate_multi_level_list(vector_path):
    result = []
    current_level = result

    for level in vector_path:
        element = {"name": level, "children": []}
        current_level.append(element)
        current_level = element["children"]

    return result

# 示例向量路径
vector_path = ["A", "B", "C"]

# 生成多级列表
multi_level_list = generate_multi_level_list(vector_path)

# 打印结果
print(multi_level_list)

[
    {
        "name": "A",
        "children": [
            {
                "name": "B",
                "children": [
                    {
                        "name": "C",
                        "children": []
                    }
                ]
            }
        ]
    }
]