r - winbugs中tapply的对应物

Question

我需要计算每个状态的平均值。在 R 中，我通过使用

tapply(y,state,mean).

这是一个例子：

state <- rbinom(10,4,0.6)
y <- rnorm(10)
tapply(y,x,mean)

其中 y 表示拟合值的向量，state 表示作为因子的因变量。

我想知道如何在 Winbugs 中做到这一点。有人对此有任何想法吗？