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