如何从R中的直方图提取频率？

当我们创建直方图并将其保存为对象名称时，我们可以通过调用该对象来提取频率作为中间值或中断的计数。我们可以认为由对象获得的中间值或中断是频率在直方图上绘制的实际值。

例子

> x1<-rpois(1000,5)
> Histogram1<-hist(x1)
> Histogram1

输出结果

$breaks
[1] 0 1 2 3 4 5 6 7 8 9 10 11 12 13
$counts
[1] 45 82 150 156 172 142 113 62 43 20 9 5 1
$density
[1] 0.045 0.082 0.150 0.156 0.172 0.142 0.113 0.062 0.043 0.020 0.009 0.005
[13] 0.001
$mids
[1] 0.5 1.5 2.5 3.5 4.5 5.5 6.5 7.5 8.5 9.5 10.5 11.5 12.5
$xname
[1] "x1"
$equidist
[1] TRUE
attr(,"class")
[1] "histogram"

> x2<-rpois(100000,5)
> Histogram2<-hist(x2)
> Histogram2

输出结果

$breaks
[1] 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
$counts
[1] 4068 8293 14117 17627 17451 14671 10471 6604 3545 1793 810 322
[13] 152 49 12 10 4 1
$density
[1] 0.04068 0.08293 0.14117 0.17627 0.17451 0.14671 0.10471 0.06604 0.03545
[10] 0.01793 0.00810 0.00322 0.00152 0.00049 0.00012 0.00010 0.00004 0.00001
$mids
[1] 0.5 1.5 2.5 3.5 4.5 5.5 6.5 7.5 8.5 9.5 10.5 11.5 12.5 13.5 14.5
[16] 15.5 16.5 17.5
$xname
[1] "x2"
$equidist
[1] TRUE
attr(,"class")
[1] "histogram"

> x3<-runif(10000,5,10)
> Histogram3<-hist(x3)
> Histogram3

输出结果

$breaks
[1] 5.0 5.5 6.0 6.5 7.0 7.5 8.0 8.5 9.0 9.5 10.0
$counts
[1] 1062 1037 959 987 1010 970 942 1019 1045 969
$density
[1] 0.2124 0.2074 0.1918 0.1974 0.2020 0.1940 0.1884 0.2038 0.2090 0.1938
$mids
[1] 5.25 5.75 6.25 6.75 7.25 7.75 8.25 8.75 9.25 9.75
$xname
[1] "x3"
$equidist
[1] TRUE
attr(,"class")
[1] "histogram"

> x4<-rnorm(10000,5,10)
> Histogram4<-hist(x4)
> Histogram4

输出结果

$breaks
[1] -35 -30 -25 -20 -15 -10 -5 0 5 10 15 20 25 30 35 40 45 50
$counts
[1] 1 15 47 155 459 939 1458 1924 1922 1511 938 406 153 55 13
[16] 1 3
$density
[1] 0.00002 0.00030 0.00094 0.00310 0.00918 0.01878 0.02916 0.03848 0.03844
[10] 0.03022 0.01876 0.00812 0.00306 0.00110 0.00026 0.00002 0.00006
$mids
[1] -32.5 -27.5 -22.5 -17.5 -12.5 -7.5 -2.5 2.5 7.5 12.5 17.5 22.5
[13] 27.5 32.5 37.5 42.5 47.5
$xname
[1] "x4"
$equidist
[1] TRUE
attr(,"class")
[1] "histogram"