Lau*_*rin 2 algorithm counter r matrix
我有一个 4049x30 的数据集,每个单元格都有一个数字或 NA。我需要计算每行特定数字出现的次数。IE
m<-matrix(c(1, 2, 3,
1, 5, 6,
3, 5, 6,
2, 3, 7), ncol=3, byrow = TRUE)
Run Code Online (Sandbox Code Playgroud)
我有 (2,3) 两次和 (5,6) 两次
非常感谢你的帮助
m_tbl <- table(paste(m[,-ncol(m)], m[,-1], sep = ','))
m_tbl[m_tbl > 1]
# 2,3 5,6
# 2 2
m_tbl <- table(m[,-ncol(m)], m[,-1])
subset(as.data.frame(m_tbl), Freq > 1)
# Var1 Var2 Freq
# 6 2 3 2
# 16 5 6 2
library(data.table)
m_dt <- data.table(c(m[,-ncol(m)]), c(m[,-1]))
m_dt[, .N, V1:V2][N > 1]
# v1 v2 N
# 1: 2 3 2
# 2: 5 6 2
Run Code Online (Sandbox Code Playgroud)