Runs a neural network with 10 hidden units for the kredit
data of Fahrmeier and Hammerle, computes the predicted
values and shows the results.
Contents of ts
[1,] "A 20 - 10 - 1 network:"
[2,] "# weights : 221"
[3,] "linear output : no"
[4,] "error function: least squares"
[5,] "log prob model: no"
[6,] "skip links : no"
[7,] "max. weight : 0.70"
[8,] "decay : 0"
[9,] "max. Iterat : 100"
Contents of ts
[ 1,] "A 20 - 10 - 1 network:"
[ 2,] "# weights : 221"
[ 3,] "linear output : no"
[ 4,] "error function: least squares"
[ 5,] "log prob model: no"
[ 6,] "skip links : no"
[ 7,] "decay : 0"
[ 8,] ""
[ 9,] " From To Weights"
[ 10,] " 0 21 -4.46"
[ 11,] " 1 21 -3.66"
[ 12,] " 2 21 -1.1"
[ 13,] " 3 21 -3.1"
...
[228,] " 28 31 146"
[229,] " 29 31 52"
[230,] " 30 31 57.3"