R/combineAND.R

In nicohuttmann/htmnanalysis: Analysis of Omics Data

#' Combines logical vectors using and
#'
#' @param x logical vector 1
#' @param y logical vector 2
#'
#' @return
#' @export
#'
#'
combineAND <- function(x, y) {
  z <- c()
  for(i in 1:length(x)) {
    z <- c(z, x[i] && y[i])
  }
  z
}