Thread Subject: arrengment of eigenvalu and eigenvector

Dear all...
Hello...

happy new year frist. please i want to ask if that
possible in matlab to give my the eigenvalue and eigen
vector arrengement decreasing

"mustafa alheety" <alheety@yahoo.com> wrote in message
<flco7r$ieu$1@fred.mathworks.com>...
> Dear all...
> Hello...
>
> happy new year frist. please i want to ask if that
> possible in matlab to give my the eigenvalue and eigen
> vector arrengement decreasing


Hello Mustafa
also i need this solve and more information for this
problem in mat. porgram
thanks happy new year

"feras batah" <ferashaker2001@yahoo.com> wrote in message <flcou2$rsg
$1@fred.mathworks.com>...
> "mustafa alheety" <alheety@yahoo.com> wrote in message
> <flco7r$ieu$1@fred.mathworks.com>...
> >
> > happy new year frist. please i want to ask if that
> > possible in matlab to give my the eigenvalue and eigen
> > vector arrengement decreasing
>
> Hello Mustafa
> also i need this solve and more information for this
> problem in mat. porgram
> thanks happy new year
------
  The trouble is that eigenvalues can very easily be complex-valued, and then
how would they be arranged in decreasing order? That is probably why
MathWorks' eig function does not atttempt to sort them.

  If you happen to know your eigenvalues are all real-valued, just use the sort
function to put them in decreasing order. Of course you would undoubtedly
want to rearrange the eigenvectors in the same way so as to preserve the
appropriate pairings of eigenvectors with matching eigenvalues.

Roger Stafford

"mustafa alheety" <alheety@yahoo.com> wrote in message
<flco7r$ieu$1@fred.mathworks.com>...
> Dear all...
> Hello...
>
> happy new year frist. please i want to ask if that
> possible in matlab to give my the eigenvalue and eigen
> vector arrengement decreasing

I have sone a small m-file for you.

Bruno

function [varargout]=seig(varargin)
% function [varargout]=seig(varargin);
% SEIG sorted Eigenvalues and eigenvectors.
% Calling: similar MATLAB builtin EIG with optional
% last parameter can be 'ascend' or 'descend'
% for sorting purpose
%
% Related function eig and sort
%

vin=varargin;
sopt='';
% Look where as last argument is 'ascend' or 'descend'
if length(varargin)>=2 && ischar(varargin{end})
    sopt=lower(varargin{end});
    switch sopt
        case {'ascend' 'descend'}
            vin=varargin(1:end-1);
    end
end

nout=max(nargout,1);
varargout=cell(1,nout);
[varargout{:}]=eig(vin{:}); % call eig

if ~isempty(sopt)
    if nout==1 % Calling with 1 output
        varargout{1}=sort(varargout{1},sopt);
    else % Calling with 2 outputs
        [ds is]=sort(diag(varargout{2}),sopt);
        varargout{2}=diag(ds);
        varargout{1}=varargout{1}(:,is); % rearrange
eigen-vectors
    end
end