我正在使用 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")
在这里查看生成的输出
