计算重复的多列中值的出现次数

问：

我的问题与以下内容非常相似： R：计算多列中值的出现次数

但是，那里提出的解决方案对我不起作用，因为在同一行中，该值可能会出现两次，但我只想计算出现该值的行。我已经制定了一个解决方案，但似乎太长了：

> toy_data = data.table(from=c("A","A","A","C","E","E"), to=c("B","C","A","D","F","E"))
> toy_data
   from to
1:    A  B
2:    A  C
3:    A  A
4:    C  D
5:    E  F
6:    E  E
> #get a table with intra-link count
> A = data.table(table(unlist(toy_data[from==to,from ])))
> A
   V1 N
1:  A 1
2:  E 1
A #get a table with total count
> B = data.table(table(unlist(toy_data[,c(from,to)])))
> B
   V1 N
1:  A 4
2:  B 1
3:  C 2
4:  D 1
5:  E 3
6:  F 1
> 
> # concatenate changing sign
> table = rbind(B,A[,.(V1,-N)],use.names=FALSE)
> # groupby and subtract
> table[,sum(N),by=V1]
   V1 V1
1:  A  3
2:  B  1
3:  C  2
4:  D  1
5:  E  2
6:  F  1

有没有一些功能可以在更少的行中完成这项工作？我以为在 python 中我会连接 from 和 to 然后 match（），但找不到正确的 sintax

编辑：我知道这会起作用，但我想避免各种之间的循环（我不知道如何以这种方式格式化输出）A=length(toy_data[from=="A"|to=="A",from])"A","B"...