lrtest (тест отношения правдоподобия) для данных подсчета с использованием пакета plgm

Question

См. Две строки кода ниже. Могу ли я использовать lrtest, чтобы проверить, что лучше? Если нет, то почему бы и нет, что я должен сделать, чтобы выбрать лучший? Заранее спасибо

law <- pglm(patents ~ lag(log(rd), 0:5) + scisect + log(capital72) + factor(year), PatentsRDUS,
            family = negbin, model = "within", print.level = 3, method = "nr",
            index = c('cusip', 'year'))

lap <- pglm(patents ~ lag(log(rd), 0:5) + scisect + log(capital72) + factor(year), PatentsRDUS,
            family = poisson, model = "pooling", index = c("cusip", "year"),
            print.level = 0, method="nr")