R/cell_effect_or.R

cell_effect_or <-
function(x,y,z,w)
{ ((1+x*y/y*z/z)^(-1)+(1+x*y/y*z)^(-1)*w)*((1+x*y/y*z/z)^(-1)+(1+x*y/y*z)^(-1)*w*z)^(-1)*
((1+x*y*z/z)^(-1)+(1+x*y*z)^(-1)*w*z)*((1+x*y*z/z)^(-1)+(1+x*y*z)^(-1)*w)^(-1)}

Try the efflog package in your browser

Any scripts or data that you put into this service are public.

efflog documentation built on May 2, 2019, 8:17 a.m.