function w = initc(p,s)
%INITC Inititialize competitive layer.
%
%	This function is obselete.
%	Use NNT2C and INIT to update and initialize your network.

nntobsf('initc','Use NNT2C and INIT to update and initialize your network.')

%	INITC(P,S)
%	  P - Rx2 matrix of input vectors.
%	  S - Number of neurons in layer.
%	Returns SxR weight matrix.
%	
%	IMPORTANT: Each ith row of P must contain expected
%	  min and max values for the ith input.
%	
%	EXAMPLE: W = initc([-2 2;0 5],3)
%	         p = [1 2 3]';
%	         a = simuc(p,W)
%	
%	See also INITFUN, COMPNET, SIMUC, TRAINC.

% Mark Beale, 12-15-93
% Copyright 1992-2000 The MathWorks, Inc.
% $Revision: 1.8 $  $Date: 2000/06/15 04:21:38 $

% INPUTS
[R,Q] = size(p);
if Q < 2,error('First argument did not have multiple columns.'),end

w = midpoint(s,p);
