R의 경우 ggforce
ggplot2를 확장하고 geom_arc()
매우 가까운 것을 정의하는 패키지가 있습니다. 아래 예 :
library(ggplot2)
library(ggforce)
start <- c(x = 0, y = 0)
dat <- data.frame(
x = start[c("x", "x")],
y = start[c("y", "y")],
xend = c(1, 4),
yend = c(5, 1)
)
angles <- with(dat, atan2(xend - x, yend - y))
ggplot(dat) +
geom_segment(aes(x, y, xend = xend, yend = yend)) +
geom_arc(aes(x0 = start["x"], y0 = start["y"], r = 1,
start = angles[1], end = angles[2])) +
coord_equal()
이 기사는 인터넷에서 수집됩니다. 재 인쇄 할 때 출처를 알려주십시오.
침해가 발생한 경우 연락 주시기 바랍니다[email protected] 삭제
몇 마디 만하겠습니다