R winbugs中tapply的对应项

我需要计算每个州的平均值。在R中，我使用

taply（y，state，mean）

以下是一个例子：

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

---

state你能提供一个可复制的例子吗？@Paul，我已经为这个问题添加了一个例子。我想你只需要用
for
循环的蛮力就可以做到这一点……你应该添加一个例子，说明你在WinBUGS模型中试图做什么。如果是对输入数据的操作，请在将数据传递给WinBUGS之前在R中执行该操作。如果做不到这一点，我会闻到脏东西：-）本，没错，但前提是他真的知道自己在做什么。。