R/gjamReZero.r

In dbystrova/GJAM_clust: Generalized Joint Attribute Modeling

Defines functions gjamReZero

Documented in gjamReZero

gjamReZero <- function( yDeZero ){
  
  ymat <- matrix(0, yDeZero$n, yDeZero$S)
  ymat[yDeZero$index] <- yDeZero$yvec
  colnames(ymat) <- yDeZero$ynames
  
  ymat
}