これを行う最善の方法は何ですか?ここに私がこれまでに持っているものがあります
(defn line-segment [start end]
(let [x-direction (abs (- (first end) (first start)))
y-direction (abs (- (last end) (last start)))]
(cond
(= 0 x-direction) (something ...)
(= 0 y-direction) (something ...))))
これが私の最終目標です
user=> (line-segment [5 6] [5 8])
([5 6] [5 7] [5 8])
はい、対角線はなく、x または y の動きのみです。
ありがとう。