R/step_forward.r

Defines functions step.forward

step.forward <- function(z, p, A, Ap, net) {
  ind=rowmatch(A,z)
  out=xor(Ap[ind,], matrix(Rlab::rbern(length(net$genes)*nrow(z), p), ncol=length(net$genes)))
  return(out)
}
levimcclenny/BoolFilter documentation built on May 21, 2019, 5:11 a.m.