14

这个问题是“如何将数据椭圆叠加在 ggplot2 散点图上? ”的后续问题。

我想使用填充的叠加置信椭圆创建一个ggplot2二维散点图。使用上述帖子中 Etienne Low-Décarie 的解决方案,我确实可以使用叠加椭圆。stat_ellipse该解决方案基于https://github.com/JoFrhwld/FAAV/blob/master/r/stat-ellipse.R

问:如何用某种颜色填充椭圆的内部区域(更具体地说,我想使用带有一些 alpha 的椭圆边框的颜色)?

这是从上述帖子修改的最小工作示例:

# create data
set.seed(20130226)
n <- 200
x1 <- rnorm(n, mean = 2)
y1 <- 1.5 + 0.4 * x1 + rnorm(n)
x2 <- rnorm(n, mean = -1)
y2 <- 3.5 - 1.2 * x2 + rnorm(n)
class <- rep(c("A", "B"), each = n)
df <- data.frame(x = c(x1, x2), y = c(y1, y2), colour = class)

# get code for "stat_ellipse"
library(devtools)
library(ggplot2)
source_url("https://raw.github.com/JoFrhwld/FAAV/master/r/stat-ellipse.R")

# scatterplot with confidence ellipses (but inner ellipse areas are not filled)
qplot(data = df, x = x, y = y, colour = class) + stat_ellipse()

工作示例的输出: 示例输出的图像

4

1 回答 1

20

如评论中所述,polygon此处需要:

qplot(data = df, x = x, y = y, colour = class) + 
  stat_ellipse(geom = "polygon", alpha = 1/2, aes(fill = class))

在此处输入图像描述

于 2013-02-26T22:30:56.247 回答