从R中的表获取行标签

从R中的表获取行标签,r,R,我正在研究R中的忠实的内置数据集,我想找出爆发次数最多的时间间隔。我已经将数据分组为时间间隔,并使用max()函数获得最大喷发的值,但不是时间间隔。是否有显示喷发次数最多的时间间隔 下表所示为: [1.5,2) 51 [2,2.5) 41 [2.5,3) 5 [3,3.5) 7 [3.5,4) 30 [4,4.5) 73 [4.5,5) 61 [5,5.5) 4 考虑到这里,最大值是73,如果您的数据位于命名

我正在研究R中的
忠实的
内置数据集,我想找出爆发次数最多的时间间隔。我已经将数据分组为时间间隔,并使用max()函数获得最大喷发的值,但不是时间间隔。是否有显示喷发次数最多的时间间隔

下表所示为:

[1.5,2)      51
[2,2.5)      41
[2.5,3)       5
[3,3.5)       7
[3.5,4)      30
[4,4.5)      73
[4.5,5)      61
[5,5.5)       4

考虑到这里,最大值是
73
,如果您的数据位于命名的num
q
中,我如何打印
[4,4.5)

,如下所示:

> q
[1.5,2) [2,2.5) [2.5,3) [3,3.5) [3.5,4) [4,4.5) [4.5,5) [5,5.5) 
     51      41       5       7      30      73      61       4
使用
名称

> names(q)[which.max(q)]
[1] "[4,4.5)"
> p
        max_er
[1.5,2)     51
[2,2.5)     41
[2.5,3)      5
[3,3.5)      7
[3.5,4)     30
[4,4.5)     73
[4.5,5)     61
[5,5.5)      4

> rownames(p)[which.max(p$max_er)]
[1] "[4,4.5)"
如果它位于任何类型的数据帧/矩阵/t
p
,请使用
rownames

> names(q)[which.max(q)]
[1] "[4,4.5)"
> p
        max_er
[1.5,2)     51
[2,2.5)     41
[2.5,3)      5
[3,3.5)      7
[3.5,4)     30
[4,4.5)     73
[4.5,5)     61
[5,5.5)      4

> rownames(p)[which.max(p$max_er)]
[1] "[4,4.5)"

你用来创建这个表的代码是什么?@Amit Naik你应该提供一个可复制的例子,你的数据很难复制。类似的东西可能会工作
d
name(which.max(table(cut(fiesty$expreations,seq(1.5,5.5,right=FALSE))
I首先使用“range(fiesty$expreations)”找到范围“。然后,我使用'seq()'函数将范围划分为子区间。然后,我使用'cut()'函数将数据划分为子区间,并将其放入表格中。@AmitNaik-您还可以回答问题下的所有注释,尤其是关于提供可复制示例的注释。”