データが欠落しているデータフレームに「0」の値を持つ行を追加する

Question

私はRをかなり新しくしており、現在かなり大きなデータフレームで作業しています。この中

Year Sample Species Catch 
1 2016  1  a  9 
2 2016  1  b  5 
3 2016  1  c 13 
4 2016  1  d  2 
5 2016  1  e  4 
6 2016  1  f 13 
7 2016  2  a  7 
8 2016  2  c  5 
9 2016  2  f  6 
10 2016  2  g  2 

：

ある

Year Sample Species Catch 
1 2016  1  a  9 
2 2016  1  b  5 
3 2016  1  c 13 
4 2016  1  d  2 
5 2016  1  e  4 
6 2016  1  f 13 
7 2016  1  g  0 
8 2016  1  h  0 
9 2016  1  i  0 
10 2016  1  j  0 
11 2016  1  k  0 
12 2016  2  a  7 
13 2016  2  b  0 
14 2016  2  c  5 
15 2016  2  d  0 
16 2016  2  e  0 
17 2016  2  f  6 
18 2016  2  g  2 
19 2016  2  h  0 
20 2016  2  i  0 
21 2016  2  j  0 
22 2016  2  k  0 

、そこ種のセット数は（K経由）であり、そこにある場合、基本的に私は何をしようとしていることは、このような何かを回すありますその種の記録はありません "サンプル" 0を示すレコードを持っています。

ありがとう！

Answer 1

これはいかがですか？

all.species <- c('a','b', 'c','d','e','f','g','h','i','j','k') 
samples <- split(df, df$Sample) 
new.df <- NULL 
for (sample in samples) { 
    missing.species <- setdiff(all.species, unique(sample$Species)) 
    sample <- rbind(sample, data.frame(Year=unique(sample$Year), 
            Sample=unique(sample$Sample), 
            Species=missing.species, Catch=0)) 
    new.df <- rbind(new.df, sample[order(sample$Species),]) 
} 
new.df 

出力

Year Sample Species Catch 
1 2016  1  a  9 
2 2016  1  b  5 
3 2016  1  c 13 
4 2016  1  d  2 
5 2016  1  e  4 
6 2016  1  f 13 
7 2016  1  g  0 
8 2016  1  h  0 
9 2016  1  i  0 
10 2016  1  j  0 
11 2016  1  k  0 
72 2016  2  a  7 
51 2016  2  b  0 
82 2016  2  c  5 
61 2016  2  d  0 
71 2016  2  e  0 
92 2016  2  f  6 
102 2016  2  g  2 
81 2016  2  h  0 
91 2016  2  i  0 
101 2016  2  j  0 
111 2016  2  k  0