跳转到主要内容

LISP

二叉树

这个是用lisp来构建二叉树。
对autolisp来说,构建二叉树是一个难题,因为lisp没有指针,所以比较困难。
下面是实现的代码。

画衣柜的程序

在CAD中画衣柜有时候是一件比较麻烦的事情,对2012以上的版本,可以用动态图块来实现,但还是有点罗嗦。

我下面的程序实现比较简单,只要敲入一个命令,然后你就可以任意布置你的衣柜了。

下面是其实现的代码。

凸包的LISP实现

关于凸包的维基解释:在一个实数向量空间V中,对于给定集合X,所有包含X的凸集的交集S被称为X的凸包。

凸包有很多用途,网上流传着很多其他语言的代码,LISP的却很少,下面是我的LISP实现代码:

小问题,大思考

一个博士朋友的儿子刚上初中不久,他就提出了下面的一个问题,我感觉很有深度,很难得,现在贴出来说说。

如下面图所示:已知线段AB和一点P,n等分线段,得到n+1个点与P连线。

问:n趋于无穷大时,这些连线长的平均值趋向一个定数吗? 如果是,该怎样求?