R/AllGeneric.R

In mi: Missing Data Imputation and Model Checking

# ==============================================================================
# generic method definition 
# ==============================================================================

if ( !isGeneric("call.mi")) {
  setGeneric( "call.mi",
              function(object ){
                standardGeneric( "call.mi" )
              } 
  )
}


if ( !isGeneric("coef")) {
  setGeneric( "coef",
              function( object, ... ){
                standardGeneric( "coef" )
              } 
  )
}

#setGeneric("coefficients")

if ( !isGeneric("coefficients")) {
  setGeneric( "coefficients",
              function( object, ... ){
                standardGeneric( "coefficients" )
              } 
  )
}




if ( !isGeneric("converged")) {
  setGeneric( "converged",
              function( object, ... ){
                standardGeneric( "converged" )
              } 
  )
}



if ( !isGeneric( "data.mi" )) {
  setGeneric( "data.mi",
              function( object ){
                standardGeneric( "data.mi" )
              } 
  )
}

setGeneric("fitted")

#if ( !isGeneric( "fitted" )) {
#  setGeneric( "fitted",
#              function( object, ...){
#                standardGeneric( "fitted" )
#              } 
#  )
#}





if ( !isGeneric( "m" )) {
  setGeneric( "m",
              function( object ){
                standardGeneric( "m" )
              } 
  )
}


if ( !isGeneric( "bugs.mi" )) {
  setGeneric( "bugs.mi",
              function( object, ... ){
                standardGeneric( "bugs.mi" )
              } 
  )
}


if ( !isGeneric( "info.mi" )) {
  setGeneric( "info.mi",
              function( object ){
                standardGeneric( "info.mi" )
              } 
  )
}


if ( !isGeneric( "imp" )) {
  setGeneric( "imp",
              function( object,... ){
                standardGeneric("imp")
              } 
  )
}

if ( !isGeneric( "is.mi" )) {
  setGeneric( "is.mi",
              function(object){
                standardGeneric("is.mi")
              } 
  )
}

if ( !isGeneric("mi")) {
    setGeneric( "mi",
               function(object, ...){
               standardGeneric("mi") 
               }
    )
}



if ( !isGeneric( "mi.completed" )) {
  setGeneric( "mi.completed",
              function( object, ... ){
                standardGeneric( "mi.completed" )
              } 
  )
}


if ( !isGeneric( "mi.data.frame" )) {
  setGeneric( "mi.data.frame",
              function( object,... ){
                standardGeneric( "mi.data.frame" )
              } 
  )
}



if ( !isGeneric("imputed")) {
    setGeneric("imputed",
               function( object, ... ){
                  standardGeneric( "imputed" )
               } 
    )
}

if ( !isGeneric("mi")) {
    setGeneric( "mi",
               function( object, ... ){
               standardGeneric( "mi" ) 
               }
    )
}



if ( !isGeneric("mi.hist")) {
    setGeneric( "mi.hist",
               function( object, Yobs,... ){
               standardGeneric( "mi.hist" ) 
               }
    )
}


#if ( !isGeneric("mi.initialize")) {
#  setGeneric( "mi.initialize",
#              function(object, ...){
#              standardGeneric( "mi.initialize" )
#              } 
#  )

setGeneric("resid")

#if ( !isGeneric( "resid" )) {
#  setGeneric( "resid",
#              function( object, ...){
#                standardGeneric( "resid" )
#              } 
#  )
#}

setGeneric("residuals")

#if ( !isGeneric( "residuals" )) {
#  setGeneric( "residuals",
#              function( object, ...){
#                standardGeneric( "residuals" )
#              } 
#  )
#}

if ( !isGeneric( "sigma.hat" ) ) {
    setGeneric( "sigma.hat",
               function( object,... ){
               standardGeneric( "sigma.hat" )
               } 
    )
}



if ( !isGeneric( "typecast" ) ) {
    setGeneric( "typecast",
               function( object ){
               standardGeneric( "typecast" )
               } 
    )
}



if ( !isGeneric( "update" )) {
  setGeneric( "update",
              function( object, ...){
                standardGeneric( "update" )
              } 
  )
}