每个篮子可容纳的水果总数为 10。对于每个篮子,如果计数为 10 并且缺少一个水果,我想为该篮子添加一行,该行表示该水果的计数为 0。
这是生成数据帧的代码。
Basket <- c("A","A","B","B","C","C","C")
Fruit <- c("Apple","Orange","Apple","Orange","Orange","Apple", "Guava")
count <- c("5","5","7","3","2","6","4")
data <- data.frame(Basket,Fruit,count)
Basket Fruit count
1 A Apple 5
2 A Orange 5
3 B Apple 7
4 B Guava 3
5 C Orange 2
6 C Apple 6
7 C Guava 4
我基本上希望它看起来像这样:
Basket Fruit count
1 A Apple 5
2 A Orange 5
4 A Guava 0
5 B Apple 7
6 B Orange 0
7 B Guava 3
8 C Orange 2
9 C Apple 6
10 C Guava 4
不确定循环是否是一种有效的方法,但欢迎建议。目标是获得每种水果的跨组准确平均值。