来自数据帧的唯一数据的计数

Question

好的，让我们来一些简单的数据

A <- c(1997,2000,2000,1998,2000,1997,1997,1997)
B <- c(0,0,1,0,0,1,0,0)
df <- data.frame(A,B)

现在，如果我们运行以下

length(df$B[df$A==1997& df$B==0])
length(df$B[df$A==1997& df$B==1])

我们得到每个独特的A和B组合的计数。

但我想输出一个搜索每个unique A值（代表一年）并输出B（二进制）之和的结果。结果可以是data.frame或matrix。关于如何解决这个问题的任何建议？

结果可能如下：