Hello,
I've been working with "nnet" and now I'd like to use the weigths, from
the fitted model, to iterpret some of variables impornatce.
I used the following command:
mts <- nnet(y=Y,x=X,size =4, rang = 0.1,
decay = 5e-4, maxit = 5000,linout=TRUE)
X is (m x n) Y is (m x 1)
And then I get the coeficients by:
Wts<-coef(mts)
b->h1 i1->h1 i2->h1 i3->h1 i4->h1
i5->h1 i6->h1 i7->h1 ...
b->o h1->o h2->o h3->o h4->o ...
I understood that I should get the predicted Y (hat(Y)) by:
hat(Y)=
(b->o)+((b->h1)sum(X[,1:m]*Wts[i1:m-h1]+X[,1:m]*Wts[i1:m-h2]+...+X[,1:m]
*Wts[i1:m-h4]))*(h1->o)+
((b->h2)sum(X[,1:m]*Wts[i1:m-h2]+X[,1:m]*Wts[i1:m-h2]+...+X[,1:m]*Wts[i1
:m-h4]))*(h2->o)+...)
Am I missed some point on this definition of NNET.
Thanks in advance,
Best Regards,
Marlon !!!
=======================================================================
Attention: The information contained in this message and/or ...{{dropped}}
______________________________________________
R-help@stat.math.ethz.ch mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
