在R中畫圓

Question

我正在使用plotrix軟件包繪制圓圈。

而且我沒有得到我的代碼有什么問題... :-(

我有三點。 第一點(1,1)應該是圓的中心。 以下兩個點(1,4)和(4,1)到中心的距離/半徑相同。 因此，情節中的圓圈應該經過這些點，對嗎？

而且我不知道為什么圓圈看起來不對。 有解釋嗎？

  p1 <- c(1,1)
  p2 <- c(4,1)
  p3 <- c(1,4)
  r <- sqrt(sum((p1-p2)^2))

  plot(x=c(p1[1], p2[1], p3[1]),
       y=c(p1[2], p2[2], p3[2]), 
       ylim=c(-5,5), xlim=c(-5,5))
  draw.circle(x=p1[1], y=p1[2], radius=(r))
  abline(v=-5:5, col="#0000FF66")
  abline(h=-5:5, col="#0000FF66")

看一下這里產生的輸出

Answer 1

正如@Baptiste上面所說的，您可以使用plot(...,asp=1) 。 但是，這僅在x和y范圍恰好相同的情況下才有效（因為它會將繪圖的物理縱橫比設置為1）。 否則，您可能要使用MASS軟件包中的eqscplot函數。 每當您嘗試仔細繪制幾何對象時都會出現類似的問題，例如繪制不相交的圓

該地塊代生產MASS::eqscplot的plot在上面的代碼：

請注意，根據R對顯示器配置的看法等細節，當您在R的圖形窗口中作圖時，圓圈可能看起來有點擠壓（即使它通過了點）（對我來說確實如此），但應該在圖形輸出中看起來不錯。