Displaying 1 result from an estimated 1 matches for "mcelr2".
Did you mean:
mcelog
2007 Aug 16
0
summarising systemfit with saveMemory
...mary.systemfit.
> library(systemfit)
> example(systemfit)
> surfit2 <- systemfit("SUR",system,data=Kmenta,saveMemory=T)
> summary(surfit2)
As far as I can tell, this is a result of the following code.
> print.summary.systemfit
<<--SNIP-->>
if (!is.null(x$mcelr2)) {
cat("McElroy's R-squared value for the system: ")
cat(formatC(x$mcelr2, digits = digits, width = -1))
cat("\n")
}
<<--SNIP-->>
combined with
> systemfit
<<--SNIP-->>
if (!saveMemory) {
<<--SNIP-->>
mcelr2 <...