Print the summary of a MAR model

Formats and prints the result of applying summary to a MAR object.

Usage

# S3 method for MARsummary
print(x,...)

Arguments

x

Object of class MARsummary

...

Further arguments passed to or from other methods

Author

LP Scheef

See also

summary.MAR

Value

Prints a summary of a MAR object.

Examples

data(L4.mar)
myvar <- c(0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 2)
myres <- matrix(0.5,
  nrow = length(which(myvar == 1)),
  ncol = length(which(myvar != 0))
) 
small <- L4.mar[1:20,]
run1 <- run.mar(small, variables = myvar, restrictions = myres, search = "random", boot = FALSE)
#>  
#>  
#> searching for best-fit model...
#>        ...BEST-FIT MODEL SELECTED
#> 	           ( search time:  0 minutes 5 seconds )
#>  
#>  
#>  
#> identifying 10 lowest AIC models...
#>        ...TOP MODELS RETAINED 
#>  
#> ════════════════════════════════════════════════════════════════════════════════ 
#>  
#>  

summary(run1)
#> 
#> Matrix Coefficients:
#> 
#>                 B     C    Total
#>   total.coef    9     3     12  
#>        zeros    7     3     10  
#>     nonzeros    2     0      2  
#>     positive    1     0      1  
#>     negative    1     0      1  
#> 
#> 
#> Information Criteria:
#>                 
#>   AIC   134.5006
#>   BIC   144.8894
#> 
#> 
#> R^2 Values:
#> 
#>             R2    R2_D  
#>   min      0      0.44  
#>   1st qu   0      0.45  
#>   median   0      0.45  
#>   mean     0.16   0.46  
#>   3rd qu   0.24   0.47  
#>   max      0.48   0.49  
#> 
#> 
#> Stability:
#> 
#>   ATTRIBUTE    METRIC            VALUE
#>   resilience   detB               0.00
#>   resilience   maxeigB            0.51
#>   resilience   maxeigkrB          0.26
#>   reactivity   sigma.over.Vinf   -0.76
#>   reactivity   maxeigBxB          0.17
#> 
#>