已知P1 P2 P3 三点，怎么求三点夹角A角度？

yu960312 · 发表于 2022-5-13 21:05:57

本帖最后由 yu960312 于 2022-5-13 21:15 编辑

如题：已知P1 P2 P3 三点，怎么求三点夹角A角度？

天天问 · 发表于 2022-5-14 15:40:54

D:\1.JPG直线夹角，和向量夹角的公式都送你了

xyp1964 · 发表于 2022-5-14 12:27:56

(defun abc (p1 pt p3 / ang)
  (setq ang (- (angle pt p3) (angle pt p1)))
  (if (< ang 0)(setq ang (+ (* 2.0 pi) ang)))
  (if (> ang pi)(setq ang (- (* 2.0 pi) ang)))
  ang
)

yshf · 发表于 2022-5-13 21:22:19

(setq ang (- (angle p1 p3) (angle p2 p3)))
(if (> ang (* 2.0 pi)) (setq ang (- (* 2.0 pi) ang)))

yu960312 · 发表于 2022-5-13 22:25:33

yshf 发表于 2022-5-13 21:22
(setq ang (- (angle p1 p3) (angle p2 p3)))
(if (> ang (* 2.0 pi)) (setq ang (- (* 2.0 pi) ang)))

感谢大哥指教

咏郡 · 发表于 2024-8-5 20:06:33

xyp1964 发表于 2022-5-14 12:27
(defun abc (p1 pt p3 / ang)
(setq ang (- (angle pt p3) (angle pt p1)))
(if (< ang 0)(setq ang ...

感谢，受教了

muai2010 · 发表于 2024-8-5 21:44:00

感谢分享....

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

[提问] 已知P1 P2 P3 三点，怎么求三点夹角A角度？

本帖子中包含更多资源

本帖子中包含更多资源

点评