明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
12
返回列表 发新帖
楼主: hubeiwdlue

[函数] trans函数的疑惑

[复制链接]
发表于 2023-9-1 10:40:06 | 显示全部楼层
通俗易懂,不错不错呀,看来数学肯定学的不错
 楼主| 发表于 2023-9-1 10:48:07 | 显示全部楼层
nijiea123 发表于 2023-9-1 10:40
通俗易懂,不错不错呀,看来数学肯定学的不错

准确讲,是线性代数。我高数还能记得一点点,线代是都已经还给老师了。
发表于 2023-9-14 08:59:42 | 显示全部楼层
好像终于对trans函数看懂一点了,之前高飞鸟分享的帖子,始终还是没看懂。
多谢大神。
发表于 2023-12-8 23:57:27 | 显示全部楼层
感谢大佬分享
发表于 2024-5-3 06:26:08 来自手机 | 显示全部楼层
解释的非常棒。
发表于 2024-5-3 15:00:53 | 显示全部楼层
本帖最后由 wide 于 2024-5-3 15:05 编辑
vormittag 发表于 2023-8-30 14:10
很简单:
1、(mapcar '- p2 p1) 是 p1 指向 p2 的向量,作为平面法向量 norm
2、(trans p1 0 norm) 是将  ...

http://bbs.mjtd.com/forum.php?mo ... %B1%EA%D7%A2&page=2,17楼代码中求中点部分能解释习吗?
  • (defun c:test1 (/ get_dim_mid ss n)
  •   (defun get_dim_mid (en / ent pt10 pt13 pt14 v pt13t)
  •     (setq ent  (entget en)
  •       pt10  (cdr (assoc 10 ent))
  •       pt13  (cdr (assoc 13 ent))
  •       pt14  (cdr (assoc 14 ent))
  •       v  (mapcar '- pt10 pt14)
  •       pt14  (trans pt14 0 v)
  •       pt13t  (trans pt13 0 v)
  •     )
  •     (mapcar
  •       '+
  •       pt10
  •       (mapcar '(lambda (x y) (* 0.5 (- x y)))
  •         pt13
  •         (trans (list (car pt14) (cadr pt14) (caddr pt13t)) v 0)
  •       )
  •     )
  •   )
  •   (setq ss (ssget))
  •   (repeat (setq n (sslength ss))
  •     (entmake
  •       (list (cons 0 "circle")
  •         (cons 10 (get_dim_mid (ssname ss (setq n (1- n)))))
  •         (cons 40 100)
  •       )
  •     )
  •   )
  • )

点评

找准 dxf 组码 10 13 14 分别代表的含义以后不难理解。  发表于 2024-5-6 09:40
发表于 2024-6-22 19:41:18 | 显示全部楼层
vormittag 发表于 2023-8-30 14:10
很简单:
1、(mapcar '- p2 p1) 是 p1 指向 p2 的向量,作为平面法向量 norm
2、(trans p1 0 norm) 是将  ...

大佬讲解精辟
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-11-22 17:32 , Processed in 0.165251 second(s), 20 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表