【SICP练习】94 练习2.67

最新推荐文章于 2021-04-29 12:14:30 发布

转载最新推荐文章于 2021-04-29 12:14:30 发布 · 52 阅读

0 ·

CC 4.0 BY-SA版权

原文链接：https://my.oschina.net/nomasp/blog/503286

本文展示了一个使用Lisp编程语言解码特定消息的过程。通过定义样本树和消息，演示了如何利用Lisp的特性进行数据解码。文章提供了完整的代码示例，包括树结构的创建和消息解码的实现。

练习2.67

我们先来把该导入的导入，然后就来测试了。

(load "d:\\lisp\\tree.scm")
(define sample-tree (make-code-tree (make-leaf 'A 4) (make-code-tree (make-leaf 'B 2) (make-code-tree (make-leaf 'D 1) (make-leaf 'C 1)))))
(define sample-message '(0 1 1 0 0 1 0 1 0 1 1 1 0))
(decode sample-message sample-tree)
;Value 11: (a d a b b c a)

大家按照书上的解码过程，可以人工解码进行验证的。

感谢访问，希望对您有所帮助。欢迎关注或收藏、评论或点赞。

为使本文得到斧正和提问，转载请注明出处：
http://blog.youkuaiyun.com/nomasp

转载于:https://my.oschina.net/nomasp/blog/503286