R:合并字符向量中的偶然项 table

R: Combine entries of contingency table in character vector

我有一个 data.frame 并做了一个列的应急 table

> table(data$COLX)

AAAAAAA BBBBBBB CCCCCCC DDDDDDD EEEEEEE FFFFFFF
   2254    3399    3163    2040    7710    2368 

使用 unique(data$COLX) 我得到一个字符向量 AAAAAAA BBBBBBB ...

如何创建还包含出现次数的字符向量?

我想要实现的是一个看起来像这样的字符向量

AAAAAAA (2254x)    BBBBBBB (3399x)    ...

我希望这就是你的意思:

tabl <- structure(c(2254L, 3399L, 3163L, 2040L, 7710L, 2368L), .Dim = 6L, .Dimnames = structure(list(AAAAAAA", "BBBBBBB", "CCCCCCC", "DDDDDDD", "EEEEEEE", "FFFFFFF")), .Names = ""), class = "table") data.frame(tabl)

Var1 Freq 1 AAAAAAA 2254 2 BBBBBBB 3399 3 CCCCCCC 3163 4 DDDDDDD 2040 5 EEEEEEE 7710 6 FFFFFFF 2368

这就是您要查找的内容:

x <- table(data$COLX)
paste(names(x), paste0("(", x, ")") )

例子

f <- gl(4, 4, labels = letters[1:4])
x <- table(f)
paste(names(x), paste0("(", x, ")") )
# [1] "a (4)" "b (4)" "c (4)" "d (4)"