home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 10 / 10.iso / l / l455 / 7.ddi / ROBUST.DI$ / UNSTKC.M < prev    next >
Encoding:
Text File  |  1993-03-11  |  298 b   |  13 lines
  1. function [aa] = unstkc(a,m,n)
  2. %
  3. % UNSTKC unstack a long column vector into mxn matrix, column by column.
  4. %
  5.  
  6. % R. Y. Chiang & M. G. Safonov 5/85
  7. % Copyright (c) 1988 by the MathWorks, Inc.
  8. % All Rights Reserved.
  9.  
  10. aa = ones(m,n);
  11. aa(:) = a;
  12. %
  13. % ------- End of UNSTKC.M ---- RYC/MGS 5/85 %