# Poisson mean model

model{

	# Likelihood

	for(i in 1:n.cc){

	reports[i] ~ dpois(lambda[i])

	log(lambda[i]) <- beta[1]*intercept.cc[i] + beta[2]*share[i] +
		beta[3]*owner[i] + beta[4]*accounts[i]
	
	}

	# prior distributions

	for(i in 1:4){
	beta[i] ~ dnorm(0, 0.001)
	}

}