scheme - 方案：将代码转换为图片

Question

我有一个奇怪的方案问题。这是我正在帮助一个朋友的更大事情的一部分。

我需要将 aTree:Data转换为准确表示树的图像（对不起，我还没有示例图像可以显示）。

如果您对此有任何想法（和/或如果您有任何疑问），请告诉我，以便我可以更新更多信息。

谢谢

Answer 1

绘制此类图表的最常见方法之一是使用graphviz。您只需要扫描树并以非常简单的语法打印出连接。

Answer 2

这是我一直在寻找的答案。我想我应该更好地表达我的问题。无论如何，非常感谢您的帮助，@EliBarzilay 和 @KevinHwang

(define (Tree:Data->Pict dt)
  (if (DataTree? dt)
      (frame
       (vl-append 10
                  (Tree:Data->Pict (DataTree-data dt))
                  (apply ht-append 10
                         (map Tree:Data->Pict (DataTree-children dt)))))
      (code #,dt)))

Answer 3

如果你真的，真的，真的必须直接在 Scheme 中做，那么让我在这里指导你：

http://www.gnu.org/software/mit-scheme/documentation/mit-scheme-ref/Drawing-Graphics.html

Scheme 确实有一个内置的图形库，尽管这可能是 MIT Scheme 特有的。在伯克利，我们的入门课使用了 SICP，并且不知何故我们确实有图形，尽管这些图形是否是内置的，或者教师是否为我们添加了它们，我不太清楚。