ryamada https://blog.hatena.ne.jp/ryamada/ ryamadaのコンピュータ・数学メモ https://ryamada.hatenadiary.jp/ 外接円 外接中心 circumcenter python R DEC こちらにも書いた通り、三角化した後、その外接中心を取ることは便利 外接中心をさらっと線形代数処理で出すには、こちらのpydecのそれがよい Barycentric coordinateで出してそのあと通常座標にすればよい それをRで書き換えると： my.circ.center.bary <- function(pts){ d <- length(pts[1,]) n.pt <- length(pts[,1]) A <- 2* pts %*% t(pts) A <- cbind(A,rep(1,n.pt)) A <- rbind(A,c(rep(1,n.pt),0)) b <- c(apply(… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fryamada.hatenadiary.jp%2Fentry%2F20150927%2F1443320860" title="外接中心 - ryamadaのコンピュータ・数学メモ" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2015-09-27 11:27:40 rich https://ryamada.hatenadiary.jp/entry/20150927/1443320860 1.0 100%