r - 包含行中出现次数最多的字符串的新列

Question

我试图用行中出现次数最多的字符串创建一个列，并用这个最常见的字符串出现的次数创建另一个列。

为了方便我的问题，这是我想要实现的目标:

我的实际DF

我想得到的是:最普遍的类别和计数

示例 df:

f <- data.frame(ID = 1:4,
           V1 = c("A","B","C","D"),
           V2 = c("A", "B","D","B"),
           V3 = c("A","C","D","B"))

Answer 1

另一种方式:

count <- sapply(apply(f[, -1], 1, table), max)
count
# [1] 3 2 2 2
category <- names(sapply(apply(f[, -1], 1, table), which.max))
category
# [1] "A" "B" "D" "B"
f2 <- data.frame(f, category, count)
f2
#   ID V1 V2 V3 category count
# 1  1  A  A  A        A     3
# 2  2  B  B  C        B     2
# 3  3  C  D  D        D     2
# 4  4  D  B  B        B     2