円を描くためにplotrixパッケージを使用しています。
そして、私は私のコードの何が悪いのかわかりません... :-(
私は3つのポイントがあります。最初の点(1,1)は円の中心である必要があります。次の2つのポイントは(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")
ここで生成された出力を見てください
