sdmupq.m

来自「这是matlab解2阶锥工具包」· M 代码 · 共 29 行

function u = sdmupq(p,q)
% SDMUPQ - define a permutation matrix
%   u = sdmupq(p,q);
    
%   This file is part of SeDuMi Interface 1.04 (JUL2002)
%   Last update : 31 July 2002
%   Copyright (C) 2002 Dimitri Peaucelle & Krysten Taitz
%   LAAS-CNRS, Toulouse, France
% 
%   This program is free software; you can redistribute it and/or modify
%   it under the terms of the GNU General Public License as published by
%   the Free Software Foundation; either version 2 of the License, or
%   (at your option) any later version.
% 
%   This program is distributed in the hope that it will be useful,
%   but WITHOUT ANY WARRANTY; without even the implied warranty of
%   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
%   GNU General Public License for more details.
% 
%   You should have received a copy of the GNU General Public License
%   along with this program; if not, write to the Free Software
%   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  
  cols=[];
  for jj=1:p
    cols=[cols,jj:p:(jj+p*(q-1))];
  end;
  u=sparse(1:(q*p),cols,1,q*p,q*p);