嗨,我正在尝试将二叉树转移到列表中,但在后序中交叉。
(define (postorden arbol)
(if (null? arbol)
('()) (append (append (postorden (car (cdr arbol)))
(postorden (car (cddr arbol))))
(list (car arbol)))))
但我得到这个错误:
cdr:预期违反合同:对?给定:'空
但是例如对于这棵树:'((1 2) ((7 10) ((2 4) null null)) ((6 8) ((10 13) null null) null))
执行 cdr 并得到: (((7 10) ((2 4) null null)) ((6 8) ((10 13) null nul) null)) 然后我把车开到这个结果:'(( 7 10) ((2 4) null null)) 如果它是一对。所以我不明白出了什么问题。
先感谢您。