NetDisplay

by Jonas Sjöberg

This notebook illustrates the command NetDisplay which produce a picture of the neural network architecture of feedforward, Radial basis functions, Perceptrons, and dynamic neural networks.

Load the package containing the command.

<< NetDisplay`

?NetDisplay

Here follows a couple of examples

ffnet1 = InitializeFeedForwardNet[{{1,2,3,4}}, {{1,2,3}},{},RandomInitialization->True,OutputNonlinearity->SaturatedLinear]

NetDisplay[ffnet1]

ffnet2 = InitializeFeedForwardNet[{{1,2,3,4}}, {{1,2,3}},{1,2},RandomInitialization->True,BiasParameters->False,RandomInitialization->True];

NetDisplay[ffnet2]

rbf1 = 
        InitializeRBFNet[{{1, 2, 3}}, {{1}}, 4, 
          RandomInitialization -> True];

NetDisplay[rbf1]

per1 = InitializePerceptron[{{1, 2, 3}}, {{1}}];

NetDisplay[per1]

per2 = InitializePerceptron[{{1, 2}}, {{1, 0, 1}}];

NetDisplay[per2]

narx1 = NeuralARXFit[Table[{1, 2}, {20}], 
            Table[{1}, {20}], {1, {1, 2}, {1, 0}}, FeedForwardNet, {1}, 0, 
            RandomInitialization -> True][[1]];

NetDisplay[narx1]

nar2 = NeuralARFit[Table[{1, 2}, {20}], {3, 4}, 
            FeedForwardNet, {1}, 0, 
            RandomInitialization -> True][[1]];

NetDisplay[nar2]