Skip to main content

Browse the archive

Revision 2fc8c4fd1f424c8b2c3ae6ce3215e21c8381d6ab authored by Samrachana Adhikari on 25 November 2016, 07:42:51 UTC, committed by cran-robot on 25 November 2016, 07:42:51 UTC 
version 0.7
1 parent d08047e
Raw File
print.summary.HLSM.R 
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) }
    if(all(!is.na(x$est.alpha))){
    message("\n Estimated Intervention Effect:\n")
    print(x$est.alpha) }
}
back to top