Don't like ads? PRO users don't see any ads ;-)
Public Pastes
Guest

Untitled

By: a guest on Aug 10th, 2012  |  syntax: None  |  size: 0.44 KB  |  hits: 8  |  expires: Never
download  |  raw  |  embed  |  report abuse  |  print
Text below is selected. Please press Ctrl+C to copy to your clipboard. (⌘+C on Mac)
  1. Recalculating predicted values of neural network
  2. test <- read.csv('ScaledData.csv',header=TRUE,sep = ",")
  3.  
  4. ANNtrain <- nnet(Price ~ Sqft + Bedrooms + Bathrooms,test[1:650,],size=2, maxit=5000, linout=TRUE)
  5.  
  6. ANNtrain$wts
  7.  
  8. ANNtrain$fitted.values
  9.        
  10. b->h1   2.3681687
  11. i1->h1  -0.3898256
  12. i2->h1  1.3565967
  13. i3->h1  -1.8423163
  14. b->h2   1.4826518
  15. i1->h2  0.6584391
  16. i2->h2  0.8964167
  17. i3->h2  -1.3290192
  18. b->o    1.0835755
  19. h1->o   -4.977095
  20. h2->o   4.2466241
create a new version of this paste RAW Paste Data