提取由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()

- Andreas

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
...

- erc