R/print.ivregDecision.R

In ivregEX: Create Independent Evidence in IV Analyses and Do Sensitivity Analysis in Regression and IV Analysis

print.ivregDecision <-
function(x, ...){
	cat('Sensitivity analyses for the OLS, 2SLS and EX analyses\n\n')
	class(x) = "data.frame"
	print(x)
	cat('\n')
	cat("'-' no evidence, \t   '+'  only OLS rejects, 
	'*' one piece of evidence, '**' two pieces of evidence.\n")
}