[LISP函数]：请教高手，如何判断多义线是否关于其中点对称？

afeng0712 · 发表于 2006-6-29 22:00:37

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

请教高手，如何判断多义线是否关于其中点对称？

xiao_longxin · 发表于 2006-6-29 22:48:53

请发帖前仔细审查一下自己的语言吧，现在很多帖子看都看不懂。不知所云，或者是本人理解能力太差了吧

snoopychen · 发表于 2006-6-30 07:22:58

我认为可以这样判断
首先，假如针对的直线多义线的话
先确定出中点的座标P0
然后，依次取出第1个顶点和最后一个顶点，取这两个点的中点，看是否与P0重合
如是，继续，取出第2个与倒数第二个，再取中点，判断重合。
如全部满足，则为中心对称，否则非
假如对应存在凸度的多义线，我想增加一下凸度的判断可能是可以实现的
假如对于更复杂的spline的，说不定可以采用中点打断，镜像旋转等来实现判断的

xiao_longxin · 发表于 2006-6-30 09:41:40

所谓的中点是不是指曲线的质心？

snoopychen · 发表于 2006-6-30 09:56:44

我个人理解只是简单的长度中点吧，假如是中心对称的话应该质心也就是线段中点的

橄榄滋味 · 发表于 2006-6-30 10:12:51

一楼楼主怎么没反应呢？大家都在想办法帮你解决问题，你提的问题是有点模糊，你为什么不告诉大家呢？你不关心你提的问题吗？不关心的话你为什么要提呢？

xiao_longxin · 发表于 2006-6-30 16:40:00

看图，你能找出几组“对称”点？

snoopychen · 发表于 2006-6-30 16:57:33

:p
觉得就多义线本身而言不能算是有对称点，没有轴对称也没有中心对称

afeng0712 · 发表于 2006-7-6 12:49:11

不好意思，前几天出去旅游了，我所说的中点是指曲线上的长度中点！点对称的定义大家中学学了，应该没什么异议吧？

xiao_longxin · 发表于 2006-7-6 15:13:43

按3楼的方法应该可以实现

xyp1964 · 发表于 2006-7-6 20:50:54

[FONT=courier new];;;直线多义线中点对称
(defun c:test (/ mm)
(CMDLA0)
(setq s1 (car (entsel "\n选择: "))
ptm (xyp-get-CurveMidPoint s1)
ptm1 (polar ptm
(+ (angle (xyp-get-CurveStartPoint s1)
(xyp-get-CurveEndPoint s1)
)
(* pi 0.5)
)
10
)
ptn (uptlst s1)
l (length ptn)
mm t
n -1
)
(while (< n (/ l 2.0))
(setq pt1 (nth (setq n (1+ n)) ptn)
pt2 (nth (setq l (1- l)) ptn)
pt12 (xyp-get-MidPoint pt1 pt2)
ptm2 (inters pt1 pt2 ptm ptm1 nil)
)
(if (not (equal (distance pt12 ptm2) 0 0.000001))
(setq mm nil)
)
)
(CMDLA1)
mm
)[/FONT]

WHGF · 发表于 2006-7-8 08:32:37

对于"正对称",所有对称点的连线中点可构成一条直线,“反对称”也是这样，所畏对称点是平面几何对称图形上的点。对称图形的对称线将图形上的点分成左右两个点集，每个点集中的点都可在另一个集中找到“自己的影子”，有了这个概念程序实现就容易了

xyp1964 · 发表于 2006-7-8 08:52:55

zddc(中点对称)
功能：判断直线多义线是否关于线长度中点对称
命令：zddc

账号		自动登录	找回密码
密码			立即注册

[LISP函数]：请教高手，如何判断多义线是否关于其中点对称？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

相关帖子