R - 递归地找到子列表的数量

以下是一个示例代码，用递归的方式找到子列表的数量：

def count_sublists(lst):
    count = 0
    for item in lst:
        if isinstance(item, list):
            count += 1 + count_sublists(item)
    return count

# 测试示例
print(count_sublists([1, 2, [3, 4], [5, [6, 7]]]))  # 输出: 3
print(count_sublists([[1, 2], [3, 4]]))  # 输出: 2
print(count_sublists([1, [2, [3, [4, [5]]]]]))  # 输出: 4

在这个示例中，我们定义了一个名为count_sublists的递归函数，它接受一个列表作为参数。函数中使用一个for循环遍历列表中的每个元素，如果某个元素是一个列表，则递增计数器count并递归调用count_sublists函数来计算该子列表中的子列表数量。最后，函数返回计数器的值。

在测试示例中，我们分别测试了不同的列表，并打印出子列表的数量。