Tôi nghĩ rằng có một vài cách tiếp cận. Tôi đã không nhìn vào tất cả chúng và không chắc cái nào là tốt nhất:
Các sandwich
gói thầu:
library(sandwich)
coeftest(model, vcov=sandwich)
Nhưng điều này không cho tôi câu trả lời giống như tôi nhận được từ Stata vì một số lý do. Tôi chưa bao giờ cố gắng tìm hiểu tại sao, tôi chỉ không sử dụng gói này.
Các rms
gói: Tôi tìm thấy điều này một chút đau để làm việc với nhưng thông thường có được câu trả lời tốt với một số nỗ lực. Và nó là hữu ích nhất đối với tôi.
model = ols(a~b, x=TRUE)
robcov(model)
Bạn có thể mã nó từ đầu (xem bài đăng trên blog này ). Nó trông giống như tùy chọn đau đớn nhất, nhưng rất dễ dàng và tùy chọn này thường hoạt động tốt nhất.
Một lời giải thích đơn giản / nhanh chóng là Huber-White hoặc Robust SE được lấy từ dữ liệu chứ không phải từ mô hình, và do đó rất mạnh đối với nhiều giả định của mô hình. Nhưng như mọi khi, một tìm kiếm nhanh của Google sẽ trình bày chi tiết này nếu bạn quan tâm.