Re: 在 AutoCAD 裡面畫 函數圖形，並且求出函數的極植
; file name: d:\plot-fx.lsp
; plot y= f(x) 的函數圖形
; x= x1 to x2 step dx do ...
; dx= (x2 - x1)/no
; no= ???, 以下為設定 32個等分
(setq no 32)
; 以下為設定 x1, x2, dx= ???
(setq x1 (- 1.0 2.0) x2 (+ 1.0 2.0))
(setq dx (/ (- x2 x1) no))
; 為了避免浮點數的運算誤差，導致最後一個點被忽略，
; 必須把 x2 往外面推出去 一點點
; x2= x2 + 0.1*dx
(setq x2 (+ x2 (* 0.1 dx)))
(command "spline")
; for x= x1 to x2 step dx do ...
(setq x x1)
(while (<= x x2)
; plot y= fx(x) 的函數圖形
(setq y (+ (* x x) (* -2.0 x) -1.0))
(command (list x y))
(setq x (+ x dx))
); end while
(command "" "" "")
(princ)
; end of file
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 118.231.67.192
→
05/04 08:22, , 1F
05/04 08:22, 1F
→
05/04 08:23, , 2F
05/04 08:23, 2F
討論串 (同標題文章)
完整討論串 (本文為第 2 之 2 篇)：
Cad_Cae 近期熱門文章
PTT數位生活區 即時熱門文章
11
12