[R-br] previsão de valores futuros no pacote nnet

[Alexandro (Yahoo)]

#Boa tarde R users, supondo o CMR de uma rede neural do pacote nnet. Gostaria de saber: dado o vetor(x1,x2) >>> previsao=c(15,3)
qual seria o resultado para a variável y. Porém o comando:
#predict(rede,previsao=previsao, type = "class")
#resulta num vetor em que não sei qual é a resposta certa !

y=c(0 ,1 ,0 ,0 ,1 ,1 ,1 ,0 ,0 ,0)
x1=c(12,19,14,13,14,15,16,17,17,18)
x2=c(3,7,8,6,2,9,5,1,8,7)
amostra<-c(sample(1:5,5),sample(6:10,5));amostra
dados=data.frame(yfactor=factor(y),x1,x2)
require(nnet)
rede<- nnet(yfactor~x1+x2, data = dados, subset = amostra, size = 2, rang = 0.1,decay = 5e-4, maxit = 200)
matriz_confusao=table(y, predict(rede,dados, type = "class"))
taxa_acertos= 100*( matriz_confusao[1,1]+ matriz_confusao[2,2] ) / sum(matriz_confusao)
cat(" A taxa de acertos é de",taxa_acertos,"%","\n")
previsao=c(15,3)
predict(rede,previsao=previsao, type = "class")

#Assim, qual meu erro na previsão de y dado o vetor previsão ?
#Desde já, agradeço-lhes ! Felicidades !
#Alexandro
-------------- Próxima Parte ----------
Um anexo em HTML foi limpo...
URL: <http://listas.inf.ufpr.br/pipermail/r-br/attachments/20111020/7411083b/attachment.html>