绘制点之间的所有线

JHo*_*wIX 5 r graph ggplot2

我有以下R代码

x <- c(0.01848598, 0.08052353, 0.06741172, 0.11652034)
y <- c(0.4177541, 0.4042247, 0.3964025, 0.4074685)
d <- data.frame(x,y)

ggplot(d, aes(x=x, y=y)) + 
  geom_point(size=4)
Run Code Online (Sandbox Code Playgroud)

它创建了以下图表:

RPoints

我想以可重复的方式在这些点之间绘制所有可能的线,即点的数量,位置等可能会改变.有没有人知道R函数做这样的事情.标准+ geom_point()仅在x轴上的后续点之间绘制线条.我的理想输出如下所示.提前致谢.

带线条的RPoints

奖励 - 有没有人知道一个度量标准(最好在R中可用)来估算一组点占用的空间量?在这种情况下,外三角形包含的空间集.

编辑 - 奖金已在这里以不同的SO问题回答

MrF*_*ick 9

您可以随时进行转换以创建您​​想要自己绘制的所有细分

x <- c(0.01848598, 0.08052353, 0.06741172, 0.11652034)
y <- c(0.4177541, 0.4042247, 0.3964025, 0.4074685)
d <- data.frame(x,y)

idx <- combn(1:length(x), 2)
dd <- data.frame(x=x[idx[1,]],y=y[idx[1,]], xend=x[idx[2,]], yend=y[idx[2,]])

ggplot(d,aes(x,y)) + 
    geom_point(data=d) + 
    geom_segment(data=dd, aes(xend=xend, yend=yend))
Run Code Online (Sandbox Code Playgroud)

结果

在此输入图像描述