如何对列表元素进行分组(在 Base R 中)

list(c(1,2), c('a', 'b'), c('a', 'b'), c(2,3)) -> li
## 
## [[1]]
## [1] 1 2
## 
## [[2]]
## [1] "a" "b"
## 
## [[3]]
## [1] "a" "b"
## 
## [[4]]
## [1] 2 3

Factor     c(1,2) c('a', 'b') c(2,3)
Freq           1        2        1 

## 
## [[1]]
## [1] "1 2"
## 
## [[2]]
## [1] "a b"
## 
## [[3]]
## [1] "a b"
## 
## [[4]]
## [1] "2 3"

setNames(table(match(li, unique(li))), unique(li))
#>    c(1, 2) c("a", "b")     c(2, 3) 
#>          1           2           1 

li |>
  match(unique(li))    |>
  table()              |>
  setNames(unique(li))
#>    c(1, 2) c("a", "b")     c(2, 3) 
#>          1           2           1 

R相关问答推荐

使用Shiny组合和显示复制和粘贴的数据

寻找图片边缘

如何从R中的字符串元素中减go 一个数字？

单个轮廓重叠条的单独图例

如何使下一个按钮只出现在Rshiny 的一段时间后？""

使用sf或terra的LINESTRAING的累积长度

将包含卷的底部25%的组拆分为2行

为什么当用osmdata映射R时会得到相邻状态？

如何根据嵌套元素的名称高效而优雅地确定它属于哪个列表？

对于变量的每个值，仅 Select 包含列表中所有值的值.R

R中时间间隔的大向量与参考时间间隔的相交

变长向量的矢量化和

在散点图中使用geom_point放置线图例

使用函数从R中的列中删除标高

R try Catch in the loop-跳过缺少的值并创建一个DF，显示跳过的内容

R：使用ApexCharge更改标签在饼图中的位置

如何将字符类对象中的数据转换为R中的字符串

如何在不使用SHINY的情况下将下拉滤镜列表添加到ggploy？

如何在R中的两列以上使用联合(&U)？

如何将两个用不同的运算符替换*的矩阵相乘