Używam pakietu plotrix do rysowania okręgów.

I nie rozumiem, co jest nie tak z moim kodem ... :-(

Mam trzy punkty. Pierwszy punkt(1,1) powinien być centrum koła. Dwa następujące punkty(1,4) i(4,1) mają taką samą odległość / promień do środka. Więc koło na fabule powinno przejść przez te punkty, prawda?

I nie wiem, dlaczego krąg wygląda źle. Czy jest jakieś wyjaśnienie?

  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")

Spójrz na wyprodukowane wynikitutaj