识别直方图中的点答案

【问题标题】：identifying points in a histogram识别直方图中的点
【发布时间】：2021-08-08 07:42:32
【问题描述】：

在 R 中，我正在尝试使用鼠标以交互方式识别直方图中的 bin 值。我想我需要一些与散点图的 identify() 函数等效的东西。但 identify() 似乎不适用于直方图。

【问题讨论】：

【解决方案1】：

使用locator() 查找点，然后查找该值位于哪个区间，确保它小于条形的 y 值，然后返回计数：

set.seed(100)
h <- hist(rnorm(1:100))

# use locator() when doing this for real, i'm going to use a saved set of points
#l <- locator()

l <- list(x = c(-2.22, -1.82, -1.26, -0.79,-0.57, -0.25, 0.18, 0.75, 
0.72, 1.26), y = c(1.46, 7.81, 3.79, 9.08, 17.11, 11.61, 15, 
17.96, 5.9, 3.37))

# for debugging purposes - the nth value of the output should match where
# the n value is shown on the histogram
text(l, labels=1:10, cex=0.7, font=2)

fi <- findInterval(l$x, h$breaks)
sel <- (l$y > 0)  & (l$y < h$counts[fi])
replace(h$counts[fi], !sel, NA)

#[1]  3 NA  9 14 NA 22 20 NA 13  7

【讨论】：