データフレームのリストの列にはいくつのカテゴリがありますか？

Question

インデックスが1つのファミリがどこで終わり、別のファミリが始まるかを示すデータフレームのリストがあります。私は各家族の状態パスの列にいくつのカテゴリがあるのか​​知りたいです。

私の下の例で私は2つのファミリを持っており、各ファミリの各状態パスカテゴリ（233,434,323など）の頻度でテーブルを取得しようとしています。

マイ入力：

List <- 
'$`1` 
Chr Start End Family Statepath 
1 187546286 187552094 father 233 
3 108028534 108032021 father 434 
1 4864403 4878685 mother 323 
1 18898657 18904908 mother 322 
2 460238 461771 offspring 322 
3 108028534 108032021 offspring 434 
$’2’ 
Chr Start End Family Statepath 
1 71481449 71532983 father 535 
2 74507242 74511395 father 233 
2 181864092 181864690 mother 322 
1 71481449 71532983 offspring 535 
2 181864092 181864690 offspring 322 
3 160057791 160113642 offspring 335' 

このように、私の予想出力Freq_statepathは、次のようになります。

Freq_statepath <- ‘Statepath Family_1 Family_2 
233 1 1 
434 2 0 
323 1 0 
322 2 2 
535 0 2 
335 0 1’ 

Answer 1

私はあなたがこのような何かをしたいと思う：

test <- list(data.frame(Statepath = c(233,434,323,322,322)),data.frame(Statepath = c(434,323,322,322))) 
list_tables <- lapply(test, function(x) data.frame(table(x$Statepath))) 
final_result <- Reduce(function(...) merge(..., by.x = "Var1", by.y = "Var1", all.x = T, all.y = T), list_tables) 
final_result[is.na(final_result)] <- 0 

> test 
[[1]] 
    Statepath 
1  233 
2  434 
3  323 
4  322 
5  322 

[[2]] 
    Statepath 
1  434 
2  323 
3  322 
4  322 

> final_result 
    Var1 Freq.x Freq.y 
1 233  1  0 
2 322  2  2 
3 323  1  1 
4 434  1  1