在多项式时间内计算Scheme中两个列表的最长公共子序列
所以我需要计算两个列表的最长公共子序列，但它需要在多项式时间内。我遇到的唯一问题是我不允许使用“！”根本不。这意味着我无法使用 set! 更改向量…
从列表中添加数字（例如 asdf125dkf 将返回 8）
我需要一个函数，它将接受字符和数字列表，然后返回相加的数字（忽略字符）。这就是我到目前为止所得到的： (define (adder lst) (cond ((null? lst) …
遍历一个列表并检索其他列表
(define *graph* (read (open-input-file "test.sxml"))) (define get (lambda (l) (cond ((null? l) '()) ((equal? 'opm:artifacts (car l)) l) (els…
编译器 Bigloo 问题
我想问的是，有什么区别，按 Dr.Racket 中的“制作可执行文件”按钮，使用 bigloo 制作可执行文件。 另一个问题是，我在使用 bigloo 编译 *.scm 文件…
如何在方案中的列表中包含“quote”？
我试图在像这样的方案中创建一个列表： (list 'quote 'a) 我希望输出是 (quote a) 但解释器执行引用并且输出是： 'a 我怎样才能编写代码得到预期的输…
浏览 schme 中的 sxml 文件
我正在尝试加载 sxml 文件...我设法在方案中做到这一点。现在我想使用递归来遍历它并找到我想要的项目。我的代码是这样的， (define file (read(open-…
使用Scheme (DrRacket) 搜索列表
所以这是我的代码： (define *graph* (read(open-input-file "starbucks4.sxml"))) (define get-artifacts (lambda (l) (member (list 'opm:artifact)…
