Hello everyone,
I am interested in coding the following:

I have a mixture f(i) = pi0*f0(i) + (1-pi0)*f1(i)
Actually, for each i, I have a contingency table, say:
1    2
12  34

f0(1) in this case, would be a hypergeometric probability while, f(1) can be estimated itis still unknown. But, f1(1) is diffcult to estimate. Maybe I could use the difference of two binomials test and use the estimate of f1(1) here.
I have about 10000 of these contingency tables and I want to estimate the number of true nulls (odds ratio = 1) which is represented by pi0.
I would also like to estimate the FDR.

I plan on using the following set up:

for each table:

y(ij) | n(ij), p(ij)   ~  Binomial(n(ij), p(ij))
Use the transformation:
B(1j) = (  logit (p(oj) + logit (p(1j))  ) / 2
B(2j) = logit( p(1j) )  -  logit( p(0j) )
p(B|a,M) ~Normal(2) ( a,  M )
where B = (B1j,  B2j)
and    a  = (a1, a2)
and M is the matrix:
M11    M12
M12     M22
where p12 = M12/sqrt(M11*M22)
Model is reparametized in terms of B, a, log(M11), log(M22) and the Fisher's
z transfrom of the correlation: 0.5*log( ( 1+ p12 ) / (1 - p12) )
to tranform th ranges to the entire real line.

One of my goals is to estimate pi0 and also the FDR.

Can anyone help. In terms of the entry of the data. Full conditionals etc and Code..  






--
Thanks,
Jim.

------------------------------------------------------------------- This list is for discussion of modelling issues and the BUGS software. For help with crashes and error messages, first mail [log in to unmask] To mail the BUGS list, mail to [log in to unmask] Before mailing, please check the archive at www.jiscmail.ac.uk/lists/bugs.html Please do not mail attachments to the list. To leave the BUGS list, send LEAVE BUGS to [log in to unmask] If this fails, mail [log in to unmask], NOT the whole list