Question

我试图在直方图上获得最大频率。我有一个值列表。然后，我执行以下操作：

hist(list, breaks=length(list), freq=TRUE)

并自动生成x轴和y轴的范围。 y轴是频率，x轴是列表中的值。

那么，如何找到此图表中显示的最大频率？

我试图在图表的右上角制作一个图例，所以我需要获得最大频率值。或者有没有办法告诉R在图表的右上角放置一个图例框？

Answer 1

直方图的值可以存储为R中的数据帧。以OP的示例数据帧'list'为例，您可以：

list_histo <- hist(list, breaks=length(list), freq=TRUE)

只需输入

即可

list_histo

返回R将显示包含直方图信息的新“元”数据框（此处显示的数据是任意的，仅用于说明目的）：

$breaks
[1] 0.40 0.42 0.44 0.46 0.48 0.50 0.52 0.54 0.56 0.58 0.60 0.62 0.64 0.66 0.68
[16] 0.70 0.72 0.74 0.76

$counts
[1]      1     15    112    878   4734  17995  51094 110146 178855 216454
[11] 194536 130591  64218  23017   6117   1070    144     23

$intensities
[1]  0.00005  0.00075  0.00560  0.04390  0.23670  0.89975  2.55470  5.50730
[9]  8.94275 10.82270  9.72680  6.52955  3.21090  1.15085  0.30585  0.05350
[17]  0.00720  0.00115

$density
[1]  0.00005  0.00075  0.00560  0.04390  0.23670  0.89975  2.55470  5.50730
[9]  8.94275 10.82270  9.72680  6.52955  3.21090  1.15085  0.30585  0.05350
[17]  0.00720  0.00115

$mids
[1] 0.41 0.43 0.45 0.47 0.49 0.51 0.53 0.55 0.57 0.59 0.61 0.63 0.65 0.67 0.69
[16] 0.71 0.73 0.75

$xname
[1] "list_histo"

$equidist
[1] TRUE

attr(,"class")
[1] "histogram"

调用最大值现在很简单 - 只需使用

max(list_histo$counts)

将返回最大值。

Answer 2

set.seed(100)

x = rnorm(100, mean = 5, sd = 2)

res = hist(x)

res$mids[which.max(res$counts)]

[1] 4.5

根据中断的不同，条形的宽度会发生变化，但是中间数将为您提供所需条形图的中点。这会找到具有最高计数（最大频率）

的条的中点

Answer 3

您可以使用legend('topright',...)

代替图例的x，y参数

Answer 4

您也可以使用table(list)

它将返回值的列表和重复的次数：

> list<-c(0.2, 0.6, 0.4, 0.5, 0.1, 0.5, 0.6, 0.6, 0.6, 0.1, 0.1, 0.6, 0.6, 0.6, 0.6)

> table(list)
list
0.1 0.2 0.4 0.5 0.6 
  3   1   1   2   8 

> max(table(list))
[1] 8

R直方图 - 频率范围

4 个答案: