R 具有宽数据的几何多边形/几何路径

R 具有宽数据的几何多边形/几何路径,r,ggplot2,R,Ggplot2,我想能够从广泛的数据绘制一个多边形,这样我有几个变量指定第一,第二。。。x坐标和y坐标相同 目前,我知道的唯一解决方案是使用geom_多边形,使我的数据比需要的长4倍(每点一行)。我希望能够做到这一点而不改变数据中的行数 我在这里创建了一个虚拟示例,我想在其中绘制并填充由下面创建的一行数据帧指定的梯形。我用点绘制它,只是为了显示它是一个梯形 第二个“绘图”是尝试使用宽数据的geom_多边形。我想说x是数据框中的这些列。在实际情况中,我还将分组,因为我的数据不止一行 谢谢大家! require(d

我想能够从广泛的数据绘制一个多边形,这样我有几个变量指定第一,第二。。。x坐标和y坐标相同

目前,我知道的唯一解决方案是使用geom_多边形,使我的数据比需要的长4倍(每点一行)。我希望能够做到这一点而不改变数据中的行数

我在这里创建了一个虚拟示例,我想在其中绘制并填充由下面创建的一行数据帧指定的梯形。我用点绘制它,只是为了显示它是一个梯形

第二个“绘图”是尝试使用宽数据的geom_多边形。我想说x是数据框中的这些列。在实际情况中,我还将分组,因为我的数据不止一行

谢谢大家!

require(dplyr)
require(ggplot2)

DATA <- data.frame(
  x_low_left = c(2),
  x_low_right = c(8),
  x_upper_right = c(10),
  x_upper_left = c(0),
  y_low_left = c(0),
  y_low_right = c(0),
  y_upper_right = c(6),
  y_upper_left = c(6)
)

ggplot(DATA) +
  geom_point(aes(x_low_left, y_low_left)) +
  geom_point(aes(x_low_right, y_low_right)) +
  geom_point(aes(x_upper_right, y_upper_right)) +
  geom_point(aes(x_upper_left, y_upper_left)) +
  coord_fixed(ylim = c(-2, 8), xlim = c(-2, 12))

ggplot(DATA) +
  geom_polygon(x=c(x_low_left, x_low_right, x_upper_right, x_upper_left),
            y=c(y_low_left, y_low_right, y_upper_right, y_upper_left)) +
  coord_fixed(ylim = c(-2, 8), xlim = c(-2, 12))
require(dplyr)
需要(ggplot2)

数据是肯定的。您所需要做的就是创建您自己的Geom版本,以您的格式处理数据。很多关于如何创建几何图形的例子,包括ggplot2 2.0+小插曲。你能详细说明一下吗?我以前从未做过这样的事。