Displaying 1 result from an estimated 1 matches for "muestra2".
Did you mean:
muestra
2009 Nov 20
0
problem with predict from nnet package
...cbind(X, lag(diff(log(x)),rezagosx[k]))
}
pred=predict(net, X,type="raw")
print(sum(is.na(pred)))
pred[muestra]=diff(log(x))[muestra]
pred=exp(diffinv(pred[is.na(pred)==0],xi=log(vo)) )
muestra2=muestra
muestra2[max(which(muestra2==1))+1]=TRUE
print(length(pred))
print(sum(muestra2))
print(sum(is.na(X)))
x[muestra2]=pred[1:sum(muestra2)]
return(x)
}...