在 R 中滚动你自己的链表/树？

Question

我正试图围绕 R 编程语言的基本概念展开思考，但我发现这很困难，因为 R 是面向统计而不是通用编程的。我找不到任何类似于指针/引用的东西。您将如何在 R 语言中实现链表、搜索树等？

注意：我知道，如果您实际上是在 R 中滚动自己的自引用数据结构，那么可能有更好的方法来完成您想要完成的任务。不过，我相信答案会帮助我更好地理解语言的整体结构和概念。

编辑：关于 Matt Shotwell 的评论，这个问题的重点是我希望在 R 中干净地编写链表和树，而不是作为用 C 或其他语言编写的扩展其他语言。将其作为扩展或通过混淆解释器的神秘细节来实现目标。

Answer 1

R 中的链表可以表示为向量，通常是list。您不需要编写特殊代码来引用下一个和上一个项目，因为 R 通过索引为您完成。

要向列表中添加新项目，只需跟踪其长度并分配给下一个。

lst <- list() # creates an empty (length zero) list
lst[[1]] <- 1 # automagically extends the lst
lst[[2]] <- 2 # ditto

由于 R 处理内存的方式，这对于长列表可能效率低下。如果可能，请提前创建列表，并在它们可用时分配其内容。

lst <- list(1, 2, 3, 4, 5)    # a list of 5 items

lst <- vector("list", 10000)  # 10000 NULLs
lst[[1]] <- 1
lst[[10000]] <- 10000  # lst now contains 1, NULL, ..., NULL, 10000

从列表中删除一个项目可以使用负索引来完成。

lst <- list(1, 2, 3, 4, 5)
lst <- lst[-2]  # now contains 1, 3, 4, 5

一棵树只是一个包含其他列表的列表。

tree <- list(list(1, 2), list(3, list(4, 5)))

# left child: list(1, 2)
tree[[1]]

# right child
tree[[2]]

# right child of right child:list(4, 5)
tree[[2]][[2]]

默认情况下没有内置的结构强制执行，例如二叉树的每个节点只有两个子节点。更多结构化方法可通过 S4 类获得，但这将在紧要关头完成。