R/matrix2vector.R

In CNVassoc: Association Analysis of CNV Data and Imputed SNPs

Defines functions matrix2vector

Documented in matrix2vector

matrix2vector<-function(betam,variant)
{  
  betav<-NULL
  for (k in 1:nrow(betam)){
    if (variant[k]){
      betav<-c(betav,betam[k,])
    } else{
      betav<-c(betav,betam[k,1])
    }
  }
  return(betav)
}

Try the CNVassoc package in your browser