R/print.summary.HLSM.R

In HLSM: Hierarchical Latent Space Network Model

Defines functions print.summary.HLSM

Documented in print.summary.HLSM

print.summary.HLSM = function(x,...){
    message("Call:\n")
    print(x$call)
    #message("\n Estimated Intercept:\n")
    #print(x$est.intercept)
    if(all(!is.na(x$est.slopes))){
    message("\n Estimated Slopes:\n")
    print(x$est.slopes) }
}

Try the HLSM package in your browser