Коэффициенты Полупараметрии c Модель регрессии - PullRequest
Новая
       91

Коэффициенты Полупараметрии c Модель регрессии

0 голосов
/ 30 января 2020

Мой вопрос связан с моим предыдущим вопросом, где результаты руководства и пакета не совпадают для Semiparametri c Оценка регрессии. Пакет KSPM использует простую линейную регрессию для параметра c, если я выполняю это отдельно, то коэффициенты не совпадают. Почему? Как я описал в моем предыдущем вопросе, я хочу вычислить MSE с помощью SPR без пакета, но есть некоторая проблема в концепции или коде. Поэтому, пожалуйста, объясните мне, почему коэффициенты не одинаковы.

Код: 

n<-10

y<-rnorm(n,0,1)
x1<-runif(n, -1,1)
x2<-runif(n, 0,1)

require(KernSmooth)
PI <- abs(dpik(x2) )

require(KSPM)
nw1 <- kspm(y, linear = ~ x1, kernel = ~ Kernel(~ x2,kernel.function = "gaussian",  rho = PI))
nw1$linear.coefficients

LRM<-lm(y~x1)
LRM
...