Как сделать диагностический анализ с пакетом systemfit?
Как выполнить диагностический анализ модели с учетом пакета systemfit, например:
library(systemfit)
data("Kmenta")
eqDemand <- consump ~ price + income
eqSupply <- consump ~ price + farmPrice + trend
system <- list( demand = eqDemand, supply = eqSupply )
fitsur <- systemfit( system, "SUR", data = Kmenta, maxit = 100 )
influence.measures(fitsur)
Ошибка в UseMethod("влияние")