如何在R中提取区间的端点？

Question

我搜索过，但我找不到答案。我想进一步处理我用R geom_bin2d创建的情节数据。我使用

从这样的图中提取了区间（区间）

> library(ggplot2)
> my_plot <- ggplot(diamonds, aes(x = x, y = y))+ geom_bin2d(bins=3)
> plot_data <- ggplot_build(my_plot)
> data <- plot_data$data[[1]]
> data$xbin[[1]]
[1] [0,3.58]
Levels: [0,3.58] (3.58,7.16] (7.16,10.7] (10.7,14.3]

我尝试过的任何内容都没有，包括min和mean。如何访问像data$xbin[[1]]这样的间隔的端点？

（更新：我将示例转换为基于内置数据集的完整测试用例。）

Answer 1

像

这样的东西

library(stringr)
x <- cut(seq(1:5), breaks = 2)
as.numeric(unlist(str_extract_all(as.character(x[1]), "\\d+\\.*\\d*")))

或在你的例子中

my_plot <- ggplot(diamonds, aes(x = x, y = y))+ geom_bin2d(bins=3)
plot_data <- ggplot_build(my_plot)
data <- plot_data$data[[1]]
x <- data$xbin[[1]]
as.numeric(unlist(str_extract_all(as.character(x), "\\d+\\.*\\d*")))[2]
3.58