File: vcov.netlm.R

package info (click to toggle)
zelig 3.3-1-1
  • links: PTS
  • area: main
  • in suites: lenny
  • size: 30,800 kB
  • ctags: 470
  • sloc: sh: 81; makefile: 10
file content (4 lines) | stat: -rw-r--r-- 117 bytes parent folder | download | duplicates (2) 
1
2
3
4
 
vcov.netlm <- function(object, ...) {
  so <- summary.lm(object, corr = FALSE, ...)
  so$sigma^2 * so$cov.unscaled
}