diff toolboxes/FullBNT-1.0.7/netlab3.3/netpak.m @ 0:e9a9cd732c1e tip

first hg version after svn

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/toolboxes/FullBNT-1.0.7/netlab3.3/netpak.m	Tue Feb 10 15:05:51 2015 +0000
@@ -0,0 +1,25 @@
+function w = netpak(net)
+%NETPAK	Combines weights and biases into one weights vector.
+%
+%	Description
+%	W = NETPAK(NET) takes a network data structure NET and combines the
+%	component weight matrices  into a single row vector W. The facility
+%	to switch between these two representations for the network
+%	parameters is useful, for example, in training a network by error
+%	function minimization, since a single vector of parameters can be
+%	handled by general-purpose optimization routines.  This function also
+%	takes into account a MASK defined as a field in NET by removing any
+%	weights that correspond to entries of 0 in the mask.
+%
+%	See also
+%	NET, NETUNPAK, NETFWD, NETERR, NETGRAD
+%
+
+%	Copyright (c) Ian T Nabney (1996-2001)
+
+pakstr = [net.type, 'pak'];
+w = feval(pakstr, net);
+% Return masked subset of weights
+if (isfield(net, 'mask'))
+   w = w(logical(net.mask));
+end
\ No newline at end of file