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

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

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

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

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

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

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 (+ (* 2.0 pi) ang)))
  (if (> ang pi)(setq ang (- (* 2.0 pi) ang)))
  ang
)

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)))

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

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)))

感谢大哥指教

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

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

本帖子中包含更多资源

本帖子中包含更多资源

点评