R 提取坐标由 ggplot2::stat_density_2d 绘制

Question

我正在寻找由 ggplot2::geom_density_2d 生成的轮廓线的坐标.

我在寻找 x/y 坐标(的矩阵)列表。每条轮廓线一个。

这应该类似于 contourLines给，但我无法得到想要的结果。

这是来自 ?stat_density2d 的一些示例代码

 m <- ggplot(faithful, aes(x = eruptions, y = waiting)) +
  geom_point() +
  xlim(0.5, 6) +
  ylim(40, 110)
 m + geom_density_2d()

Answer 1

您可以使用 ggplot_build :

ggplot_build(m + stat_density2d())$data[[2]]

  level        x        y piece  group PANEL  colour size linetype alpha
1 0.002 1.633788 40.00000     1 -1-001     1 #3366FF  0.5        1    NA
2 0.002 1.611111 40.11723     1 -1-001     1 #3366FF  0.5        1    NA
3 0.002 1.555556 40.47552     1 -1-001     1 #3366FF  0.5        1    NA
4 0.002 1.526300 40.70707     1 -1-001     1 #3366FF  0.5        1    NA
5 0.002 1.500000 40.91549     1 -1-001     1 #3366FF  0.5        1    NA
6 0.002 1.448020 41.41414     1 -1-001     1 #3366FF  0.5        1    NA
...