r - 在三元图上画线

Question

我有一个像这样生成的三元图:

library(vcd)
ternaryplot(abs(replicate(3, rnorm(50))), grid=FALSE)

我不喜欢内置网格，所以我禁用了它，但我想画一些我自己的线:具体来说，我想从三角形的每个点到相对面的中点画一条线(即三条线平分我的三角形并在中心交叉)，我无法弄清楚如何做到这一点。我试过 abline() 但我这样做时似乎没有任何 react 。

我怎样才能在这个图上画线？

Answer 1

试试这个。我从阅读 ternaryplot 的代码中收集到的大部分内容:

library(vcd)
ternaryplot(abs(replicate(3, rnorm(50))), grid=FALSE)

top <- sqrt(3)/2
xlim <- c(-0.03, 1.03)
ylim <- c(-1, top)
pushViewport(viewport(width = unit(1, "snpc")))
pushViewport(viewport(width = 0.8, height = 0.8, xscale = xlim, 
                      yscale = ylim, name = "plot"))
grid.lines(c(0.75, 0.00), c(0.5 * top, 0))
grid.lines(c(0.25, 1.00), c(0.5 * top, 0))
grid.lines(c(0.50, 0.50), c(1.0 * top, 0))
upViewport(2)