unpack1.m

书籍“Regularization tools for training large feed-forward neural networks using Automatic Differentiat

function [X1,Y1]=unpack1(x,W1,B1)
%This function unpacks the column vector x into X1 and Y1.
%Call:
% [X1,Y1]=unpack1(x,W1,B1)
%
[s1,r]=size(W1);
for i=1:r
  X1(:,i)=x((i-1)*s1+1:i*s1);
end
Y1(:,1)=x(s1*r+1:s1*r+s1);